﻿Cu limbajul Cartea de răspunsuri The C Answer Wook A doua editie Soluții la exercițiile din Limbajul de programare C, ediția a doua de Brian W Kernighan și Dennis M Ritchie Clovis L Tondo International Business Machines Corporation Scott E Gimpel PRENTICE HALL, Englewood Cliffs, New Jersey K Tondo S Gimpel Cu limbajul Cartea de răspunsuri Traducere din engleză de I V Ostroumova Soluții la exerciții din cartea "The C Programming Language" de B Kernighan, D Ritchie, apărută la Editura Finanțe și Statistică în MOSCOVA "FINANȚE ȘI STATISTICĂ" BBK T Tondo K , Gimpel S T limbaj C Cartea de răspunsuri: Per din engleza - M : Finanțe și statistică, - p ISBN - - - Această publicație conține răspunsuri și explicații la exercițiile date în populara carte "The C Programming Language" de B Kernighan, D Ritchie, publicată la Editura Finanțe și Statistică în Pentru o gamă largă de utilizatori profesioniști de PC - ( )- - ISBN - - - (SUA) ISBN - - - (RF) WBC (c) de către Prentice-Hall, Inc (c) I V Ostroukhov, traducere, cuvânt înainte În fața dumneavoastră se află Cartea de răspunsuri, care oferă soluții la toate exercițiile ediției a doua a cărții "Limbajul de programare C" de B Kernighan și D Ritchie (Printice Hali, ) (în continuare CL) Institutul Național American de Standarde (ANSI) a emis standardul ANSI pentru C, iar Kernigany Ritchie a revizuit prima ediție a Limbului de programare C Am rescris soluțiile pentru a se alinia atât cu standardul ANSI, cât și cu ediția a -a a CM Un studiu amănunțit al celei de-a doua ediții a Cărții de răspunsuri, împreună cu Kernighan și Ritchie, vă va ajuta să înțelegeți limbajul C și vă va învăța arta de a programa bine în C Folosiți cartea lui Kernighan-Ritchie pentru a învăța C, faceți exercițiile, apoi studiați soluțiile prezentate aici Am construit soluții folosind constructe de limbaj cunoscute la momentul apariției exercițiului în CR Scopul acestui lucru este de a urma ritmul CR Mai târziu, când vei afla mai multe despre Sn, vei putea oferi soluții poate mai bune De exemplu, atâta timp cât operatorul if (expresie) enunţ- eeee operator- neexplicat la p CR , nu îl folosim Cu toate acestea, folosind acest operator, puteți îmbunătăți soluțiile la Exercițiile , și (p a CD-ului) Uneori oferim și soluții nerestricționate sintactic Explicăm soluțiile presupunând că ați citit materialul CI aferent exercițiului și încercăm să nu repetăm CI, ci să descriem punctele principale ale fiecărei soluții Este imposibil să înveți un limbaj de programare doar citind constructele limbajului De asemenea, trebuie să programați - să vă scrieți propriile programe și să le studiați pe altele Folosim părțile bune ale limbajului, ne facem pro programele sunt modulare, folosesc pe scară largă funcțiile bibliotecii și formatează programele pentru a vă ajuta să vedeți secvența logică Sperăm că această carte vă va ajuta să deveniți un profesionist C Mulțumim prietenilor care ne-au ajutat să producem cea de-a doua ediție: Brian Kernighan, Don Kostuch, Bruce Leng, Steve Mackey, Joan Magrabi, Julia Mistrello, Rosemary Morrisey, Andrew Nathanson, Sophie Papanicolaou, Dave Permin, Carlos Tondo, John Waite și Eden Tine Clovis L Tondo Capitolul Introducere didactică Exercițiul (p a CD-ului) Lansați programul Hello World pe sistemul dvs Experimentați prin eliminarea unor părți ale programului pentru a vedea ce mesaje de eroare primiți *indude principalO { printf("bună lume"); } În acest exemplu, caracterul newline C\n') lipsește, lăsând cursorul la sfârșitul liniei #include principalO printf("Bună lume\n") } În al doilea exemplu, nu există punct și virgulă după printf Instrucțiunile C autonome sunt terminate cu punct și virgulă (pag a CD-ului) Compilatorul trebuie să detecteze absența punctului și virgulă și să scoată un mesaj corespunzător #include principalO printf("Bună lume\n*); } În al treilea exemplu, ghilimelele duble "după \n sunt tipărite eronat ca ghilimele simple Acest citat, împreună cu acolada de închidere și punct și virgulă, este tratat ca parte a șirului Compilatorul ar trebui să recunoască aceste erori și să raporteze că lipsește ghilimele duble, că nu există paranteze de închidere înaintea acoladei de închidere, că șirul este prea lung sau că conține un caracter newline Exercițiul (pag din CD) Încercați să vă dați seama ce se întâmplă dacă șirul de argument printfO conține \c, unde c este un caracter nedescris mai sus #include principalO { print tf("Bună lume"); printf ("Bună lume\ ">; printf ("Bună lume\?"); } Manualul de referință (Anexa A, pagina a CD-ului) spune că dacă caracterul care urmează după \ nu este unul din setul dat, răspunsul este nedefinit Rezultatul acestui experiment depinde de compilator Un posibil rezultat ar putea fi Bună lumeBună lume Alo lume? unde este un bip scurt emis de un caracter ASCII Puteți utiliza \ urmat de până la cifre octale pentru a reprezenta caracterul \ este definit în setul de caractere ASCII ca un bip Exercițiul (p din CD) Modificați calculatorul de temperatură astfel încât să imprime titlul în partea de sus a tabelului #include /* tipăriți tabelul de căutare a temperaturii Fahrenheit */ /♦ temperatura în Celsius ♦/ /* pentru fahr - , , , ; varianta virgulă mobilă */ mainO { floatfahr, celsius; int inferior, superior, treaptă; mai mic - ; /♦ limita inferioară a tabelului de temperatură ♦/ superioară - ; /♦ limită superioară ♦/ pas - ; /♦ dimensiunea pasului ♦/ printf ("Fahr Celsius\n"); fahr-inferior; în timp ce (fahr superior) { celsius - ( , / , ) ♦ (fahr- , ); printf("% f % f\n", fahr, celsius); fahr-fahr+pas; } } Addendum printf("Fahr Celsius\n"); înainte ca bucla să genereze un titlu deasupra coloanelor corespunzătoare Am adăugat și două spații între % f și % f pentru a alinia valorile de ieșire cu antetul Restul programului este exact la fel ca pe C KP Exercițiul (p a CD-ului) Scrieți un program pentru a tipări o diagramă de temperatură Celsius în Fahrenheit #include /♦ tipărirea graficului temperaturii în Celsius */ /♦ Temperaturi Fahrenheit ♦/ /* pentru celsius - , , ; varianta virgulă mobilă */ mainO { floatfahr, celsius; int inferior, superior, treaptă; mai mic - ; /* limita inferioară a tabelului de temperatură */ superioară - ; /♦ limită superioară ♦/ pas "• ; /♦ mărime pas */ printf ("Celsius Fahr\n"); celsius - inferior; în timp ce (celsius /* tipăriți tabelul de cartografiere a temperaturii Celsius */ /• Temperaturile Fahrenheit în ordine inversă */ mainO { intfahr; pentru (fahr - ; fahr >- ; fahr - fahr - ) printf("% d % f\n", fahr, ( / ) ♦ (fahr- )); } Singura modificare:* pentru (fahr - ; fahr >- ; fahr - fahr - ) Prima parte a operatorului Fahr- inițializează variabila Fahrenheit (fahr) cu o limită superioară A doua parte, sau condiția care controlează bucla for, farr>- testează dacă o variabilă Fahrenheit este mai mare sau egală cu limita sa inferioară Bucla for continuă în timp ce afirmația este adevărată Expresia pasului fahr - fahr - decrementează variabila Fahrenheit cu dimensiunea pasului Exercițiul (p a CD-ului) Verificați dacă expresia getchar !eEOF este egală cu sau ♦include principalO { int c; while (c - getchar O !- EOF) printf("%d\n", c); printf("%d - la EOF\n", c); } Expresie c-getchar() Î-EOF echivalentă cu c- (getcharO Î-EOF) (p CR) Programul citește caractere din intrarea standard și folosește expresia de mai sus În timp ce getchar poate citi un caracter, nu returnează sfârșitul fișierului și expresia getchar O Î-EOF Adevărat Astfel, variabilei c i se atribuie Când programul ajunge la sfârșitul fișierului, expresia este falsă Atunci c i se atribuie și bucla se termină Exercițiul (p a CD-ului) Scrieți un program care imprimă valoarea EOF ♦include principalO { printf("EOF-%d\n", EOF); } Constanta simbolică EOF este definită în EOF în afara ghilimelelor în printf O este înlocuit cu orice text care urmează #defineEOF în fișierul inclus În sistemul nostru, EOF este - , dar poate varia de la un sistem la altul Prin urmare, constantele simbolice standard precum EOF ajută la portabilitatea unui program Exercițiul (pag din CD) Scrieți un program pentru a număra spațiile, tabulatorii și liniile noi ♦include /* numără spațiile, tabele și liniile noi */ mainO { int c, nb, nt, nl; nb - ; /♦ numărul de spații ♦/ nt - ; /♦ numărul de file ♦/ nl - ; /* numărul de linii noi ♦/ while ((c-getchar()) '-EOF) { if (cu -") ++nb; dacă (cu -V) ++nt; dacă (c -'W) ++nl; } printf("%d %d %d\n", nb, nt, nl); } unsprezece Variabilele întregi nb, nt și nl sunt folosite pentru a număra spațiile, tabulatorii și, respectiv, liniile noi Inițial, aceste trei variabile sunt setate la Corpul buclei while înregistrează apariția fiecărui spațiu, filă sau linie nouă Toate instrucțiunile if sunt executate la fiecare trecere a buclei Dacă caracterul primit este altceva decât spațiu, tabulație sau linie nouă, atunci nu se întreprinde nicio acțiune Dacă simbolul primit este unul dintre aceste trei, contorul corespunzător este incrementat Programul tipărește rezultatele când bucla while se termină (getchar returnează EOF) Declarația if-else nu este prezentă până la CR p Folosind acest operator, soluția ar putea fi astfel: #include /* numără spațiile, tabele și liniile noi */ mainO { int c, nb, nt, nl; nb - ; /♦ număr de spații ♦/ nt - ; /♦ număr de file ♦/ nl - O; /* numărul de linii noi */ while ((c-getcharO) Î-EOF) { if (c ' ') ++nb; elseif (c '\f) ++nt; elseif (c *\n*) ++nl; printf("%d %d %d\n", nb, nt, nl); } Exercițiul (p KP) Scrieți un program de copiere de la intrare la ieșire care înlocuiește fiecare linie de unul sau mai multe spații cu unul singur #include #define NONBLANK "a" /* înlocuiește un șir de spații cu unul singur */ mainO { int s lastc* lastc-NENBLANK; în timp ce ((c-getchar()) Î-EOF) { if (cî -*') putchar(c); dacă (c -") if (gust!-") putehar(c); gust c; } } Variabila întreagă c conține codul ASCII al caracterului curent de la intrarea standard, iar lastc este codul ASCII al caracterului anterior Constanta simbolică NONBLANK inițializează lastc la un caracter arbitrar (nu un spațiu) Prima instrucțiune if din corpul buclei while procesează caractere; non-spațiu alb, adică le imprimă A doua instrucțiune if se ocupă de spații, iar a treia verifică dacă există un singur sau primul dintr-un șir de spații În cele din urmă, lastc este actualizat și procesul se repetă Declarația if-else nu este prezentă până la CR p Folosind acest operator, soluția ar putea fi astfel: ♦include ♦definiți "a" NONBLANK /* înlocuiește șirul de spații cu unul singur */ principalO { int s lastc: lastc- NEBLANC; în timp ce ((c-getchar ) Î-EOF) { dacă (c!-") putchar(c); else if (lastc! - ") putchar(c); lastc-c; } } Operația logic SAU (II) nu este prezentă până la CR p Folosind această operație, soluția poate fi astfel: ♦include ♦definiți "a" NONBLANK /* înlocuiește șirul de spații cu unul singur */ principalO { int s lastc; lastc-NENBLANK; în timp ce ((c - getchar ) Î-EOF) { if (c! - * * II lastc!-") putchar(c); lastc-c; } } Exercițiul (p a CD-ului) Scrieți un program de copiere de la intrare la ieșire care înlocuiește fiecare caracter tabulator cu \t, backspace cu \b și bară oblică inversă cu \\ Acest lucru face ca filele și barele oblice să fie vizibile într-un mod clar #include /* înlocuiește caracterele de tab și backspace cu caractere vizibile ♦ / mainO { iute; while ((c-getcharO) Î-EOF) { if(c -'\f) printf ("\\t"); if (c - '\b') printf C\\b">; if (c -'W) printf("\\\\"); dacă (c!-'\b') if (c!-'\t'> if (c!-'\V) putchar(c); } } Caracterul primit la intrare poate fi o tabulație, un caracter backspace, o bară oblică inversă sau orice altceva Dacă este o filă, înlocuiți-o cu \t, treceți înapoi cu \b, bară oblică inversă cu \\ Restul este imprimat ca atare Caracterul backslash este reprezentat în C ca "\V" Tipărim două liniuțe trecând șirul "\\\\" la funcția printf Declarația if-else nu este prezentă până la CR p Folosind acest operator, soluția ar putea fi astfel: #include /* înlocuiește caracterele tab și backspace cu caractere vizibile ♦/ mainO { int c; în timp ce ((c-getcharO) !-EOF) { dacă (c -'\t') printf("\\t"); elseif (c '\b') printf C\\b"); elseif (c *\\*> printf C\\W); else putchar(c); } } Exercițiul (p a CD-ului) Cum ați testa un program de numărare a cuvintelor? Ce tipuri de informații de intrare sunt cel mai probabil să dezvăluie erori, dacă există? Pentru a testa programul de numărare a cuvintelor, mai întâi încercați să nu scrieți nimic Rezultatul ar trebui să fie: OOO (zero linii noi, zero cuvinte, zero caractere) Apoi introduceți un cuvânt cu un singur caracter Rezultatul ar trebui să fie: (o linie nouă, un cuvânt, două caractere - o literă urmată de un caracter de linie nouă) Apoi încercați un cuvânt cu două caractere Rezultatul ar trebui să fie: (o linie nouă, un cuvânt, trei caractere - două normale și o linie nouă) În plus, încercați cuvinte cu un singur caracter (ar trebui să fie ) și cuvinte cu un singur caracter, un cuvânt pe rând (ar trebui să fie ) Tipurile de intrare cel mai probabil să detecteze erori sunt cele care testează condițiile la limită Iată câteva granițe: - fara intrare; - fără cuvinte - doar linii noi; - fără cuvinte - doar spații, file și linii noi; - un cuvânt pe linie - fără spații sau tab-uri; - un cuvânt care începe la începutul unui rând; este un cuvânt care începe după mai multe spații Exercițiul (p a CD-ului) Scrieți un program care imprimă informațiile de intrare un cuvânt pe linie #include #define IN /♦ în cuvânt ♦/ #define OUT /* în afara cuvântului ♦/ /* tipăriți introducerea unui cuvânt pe rând */ principalO { int c, stare; stare - OUT; în timp ce ((c-getchar()) Î-EOF) { dacă (c - "II c-An' II c-At'){ if (stare - IN) { putchar(An'); /* cuvânt final ♦/ state-OUT; } }elseif (state OUT) { stare - IN; /♦ început de cuvânt ♦/ putchar(c); }altfel putchar(c); /* în interiorul cuvântului */ } } starea este o variabilă booleană întreagă care surprinde dacă programul se află sau nu în interiorul cuvântului La începutul programului, starea este setată la OUT (exterior) deoarece nu au fost procesate date În primul rând, declarația if dacă (c-" I r s-li' nc - '\r) află dacă cu un delimitator de cuvinte Dacă da, atunci a doua declarație if AND (stat-IN) determină dacă acest delimitator marchează sfârșitul unui cuvânt Dacă înseamnă, este tipărit un caracter newline și starea este actualizată; în caz contrar, nu se întreprinde nicio măsură Dacă c nu este un separator, atunci este fie primul caracter al cuvântului, fie următorul caracter din cuvânt Dacă este începutul unui cuvânt, programul actualizează starea În caz contrar, caracterul este imprimat Exercițiul (pag din CD) Scrieți un program pentru a tipări o histogramă a lungimii cuvintelor de intrare Cu bare orizontale, desenarea unei histograme este ușor; orientarea verticală este mai dificilă #include #define MAXHIST /♦ lungime maximă histogramă ♦/ #define MAXWORD /* lungime maximă a cuvântului */ #define IN /* într-un cuvânt */ #define OUT /♦ în afara cuvântului ♦/ /* imprimă o histogramă orizontală */ mainO { int c, i, nc, stare; intlen; /* lungimea fiecărei coloane */ intmaxvalue; /* valoarea maximă pentru wl[i] */ int ovflow; /* numărul de cuvinte prea lungi */ int wl [MAXWORD]; /♦ contoare de lungime a cuvintelor ♦/ stare -OUT; nc - ; /* numărul de caractere din cuvânt */ ovflow- ; /♦ număr de cuvinte >-MAXWORD ♦/ pentru (i - ; i ) dacă (nc maxvalue) maxvalue-wl[i]; pentru (i - ; i ){ if (den-wl[i] ♦ MAXHIST / maxvalue) ){ putchar('♦'); len; } putchar('W); } dacă (debit > ) printf("S-au găsit %dwords >- %d\n", ovflow, MAXWORD); Un spațiu, linie nouă sau tabulație marchează sfârșitul unui cuvânt Dacă există un cuvânt (ps > ) și lungimea acestuia este mai mică decât maximul (nc • MAXWORD), programul incrementează variabila ovflow, care stochează numărul de cuvinte mai mare sau egal cu MAXWORD Când toate cuvintele au fost citite, programul determină valoarea maximă (maxvalue) din tabloul wl Variabila len scalează valoarea lui wl[i] în funcție de MAXHIST și maxvalue Când wl[i ] este mai mare decât , este tipărit cel puțin un asterisc #include #define MAXHIST /* lungime maximă a histogramei ♦/ fdefine MAXWORD /* lungime maximă a cuvântului */ #define IN /♦ într-un cuvânt ♦/ #define OUT /* în afara cuvântului */ /* imprimă histograma verticală */ mainO { int c, i, j, ne, stare; intmaxvalue; /* valoare maximă pentru wl [i] ♦/ int ovflow; /* număr de cuvinte prea lungi ♦/ int wl [MAXWORD]; /♦ contoare de lungime a cuvintelor ♦/ stare - OUT; nc - ; /* numărul de caractere din cuvânt ♦/ ovflow - ; /♦ număr de cuvinte >- MAXWORD ♦/ pentru (i - ; i ) dacă (nc maxvalue) maxvalue-wl[i]; pentru (i - MAXHIST; i > ; -i) { for (j - ; j ) printf("S-au găsit %d cuvinte >- %d\n", ovflow, MAXWORD); } Acest program imprimă un grafic cu bare verticale Este similar cu cel precedent până în punctul în care este definită valoarea maximă Apoi trebuie să scalați elementele matricei wl și să verificați dacă ar trebui tipărit un asterisc pentru fiecare Această verificare este necesară deoarece toate coloanele sunt imprimate în același timp (histograma este verticală) Ultimele două bucle for imprimă indexul și valoarea fiecărui element al matricei wl Exercițiul (p a CD-ului) Scrieți un program care imprimă o histogramă a frecvenței de apariție a diferitelor caractere de intrare ♦include ♦include ♦define MAXHIST /* lungimea maximă a histogramei */ ♦define MAXCHAR /♦ număr de caractere diferite ♦/ /* imprimă o histogramă orizontală a aparițiilor de frecvență */ /♦ caractere diferite */ mainO { int c, i; intlen; /* lungimea fiecărei coloane ♦/ intmaxvalue; /* valoarea maximă pentru cc[i] */ int cc [MAXCHAR]; /♦ contoare de caractere */ pentru (i - ; I maxvalue) maxvalue-cc[i]; pentru (i- ; i ){ dacă (den -cc[i] ♦ MAXHIST / maxvalue) ) { putcharf*'); -len; putchar('\n'); } } Acest program este similar cu diagrama cu bare orizontale din Exercițiul Acum numărăm frecvențele diferitelor caractere, pentru care folosim o matrice de contoare de caractere constând din elemente MAXCHAR și ignorăm caracterele cu coduri mai mari sau egale cu MAXCHAR dacă acestea există în setul de caractere utilizat O altă diferență este că folosim o macrocomandă pentru a afla dacă un caracter este imprimabil Fișierul include este discutat la p CR Macrocomanda isprint este descrisă la pagina a CD-ului (Anexa B: Biblioteca standard) Exercițiul (p CG) Rescrieți programul de conversie a temperaturii din Secțiunea , astfel încât să utilizați funcția de conversie #include float celsius(float fahr); /* tipăriți tabelul de căutare a temperaturii Fahrenheit */ /* temperaturi în grade Celsius */ /* pentru fahr- , , , ; varianta virgulă mobilă */ mainO { floatfahr, celsius; interior, superior, treaptă; mai mic - ; /* limita inferioară a tabelului de temperatură */ superioară - ; /* limita superioară */ pas - ; /* pas gigant */ fahr-Jower, while (fahr fdefine MAXLINE /* dimensiunea maximă a liniei de intrare •/ int getline(char line [], int maxline); voidcopy(car to[], charfrom[]); /♦ imprimă cea mai lungă linie de intrare •/ mainO intlen; /♦ lungimea șirului curent ♦/ intmax; /♦ lungime maximă curentă •/ linie de caractere [MAXLINE]; /* linia de intrare curentă ♦/ cel mai lung caracter[MAXLINE]; /♦ cel mai lung șir stocat aici */ max- ; while ((len - getline(line,MAXLINE" > ) { printf("%d, %s", len, line); if (len > max) { max - len; așternut (cel mai lung, linie); } } if (max > ) /* a apărut șirul */ printf ("%s", cel mai lung); întoarce O; /♦ getline: citește linia la s, returnează lungimea */ int getline(char s[], int lim) { int c, i, j; j- î for(i- ; (c-getcharO)!-EOF&&c!-'\n';++i) if (i ♦definiți MAXUNE /* dimensiunea maximă a șirului de intrare ♦/ ♦definiți LONGUNE int getline(car line[], int maxline); /* imprimă cea mai lungă linie de intrare */ mainO intlen; /* lungimea șirului curent ♦/ linia char [MAXUNE]; /* linia de intrare curentă ♦/ while (den-getline(line,MAXUNE" > ) if (len > LONGUNE) printf("%s",linie); întoarce ; } Pentru a citi linia de intrare, programul apelează getline Funcția getline returnează lungimea șirului și așadar cât mai multe personaje Dacă lungimea este mai mare de de caractere (LONGLINE), programul imprimă linia introdusă În caz contrar, nu se ia nicio măsură Bucla se repetă până când getline returnează lungimea zero Funcția getline este aceeași ca în exercițiul Exercițiul (p CG) Scrieți un program care elimină spațiile și tabulatorii din fiecare linie de intrare și distruge liniile care constau doar din spații #include #define MAXLINE /* dimensiunea maximă a liniei de intrare */ int getline (linia char [], int maxline); int remove(cars[]); /♦ elimină spațiile de sfârșit și filele, distruge liniile goale ♦/ mainO charline[MAXLINE]; /* linia de intrare curentă */ while (getline (line, MAXLINE) > ) if (remove(line) > ) printf ("%s", line); returnează ; } /* elimină spațiile de sfârșit și tabulatorii din șirul de caractere s */ int remove(char s []) { int i; i- ; în timp ce (s [i] !- '\n') /* caută un caracter newline */ ++i; i; /♦ mutați înapoi de la "\n" ♦/ în timp ce (i >- && (în[i] - " a[i] - - 'W)) -i; if (i >- ) { /♦ acesta nu este un șir gol? */ + ; s [i] - *\n*; /* returnează caracterul de linie nouă ♦/ ++i; s[i] - '\ *; /♦ linie finală ♦/ } retum i; } Funcția de eliminare elimină spațiile și tabulatorii din linia șirului de caractere și returnează noua lungime Dacă această lungime este mai mare decât , atunci linia conține alte caractere decât spații și tab-uri, iar programul tipărește acea linie În caz contrar, linia constă în întregime din spații și file și este astfel ignorată Acest lucru asigură că toate liniile de spații albe sunt suprimate Funcția de eliminare găsește un caracter de nouă linie și se mută înapoi cu o poziție Apoi se deplasează înapoi prin spații și file până când găsește un alt caracter sau nu mai există caractere (i - , atunci rămâne cel puțin unul Funcția de eliminare adaugă caractere de linie nouă și de sfârșit de linie, apoi returnează i Funcția getline este aceeași ca în exercițiul Exercițiul (p din CD) Scrieți o funcție inversă(e) care inversează șirul de caractere s (inversează caracterele) Folosiți-l pentru a scrie un program care inversează șirurile de caractere introduse #include #define MAXUNE /* dimensiunea maximă a liniei de intrare */ int getline (linia char [], int maxline); void revers(caractere[]); /* extinde liniile de intrare, rând cu linie la un moment dat */ mainO { charline[MAXLINE]; /♦ current input line ♦/ while ((len-getline(line,MAXUNE)) > ) { invers (linie); printf("%s",linie); } } /• invers: inversează șirul ♦/ void revers(caractere[]) { inti, j; chartemp; i- ; în timp ce (s[ij !- '\ ') /♦ caută sfârșitul șirului ♦/ ++i; i; /• mutați înapoi de la *\ ' ♦/ dacă (s[i]-'W) i; /♦ lăsați caracterul nou linie pe loc ♦/ j - ; /♦ începutul unei noi linii s ♦/ while (j ♦definiți TABINC /* pasul de creștere a filei */ /* înlocuiți file cu numărul necesar de spații */ mainO { int c, nb, pos; nb - ; /* numărul necesar de spații */ pos - ; /♦ poziția caracterului șirului */ while ((cu getcharO)! -EOF) { if (c - - '\f) { /* caracter tabulator */ nb-TABINC - (pos - ) % TABINC; în timp ce (nb > ) { putchar*); ++poz; nb; } else if (c - - '\n'> { /♦ caracter newline ♦/ putchar(c); pos- ; } else { /• toate celelalte caractere ♦/ putchar(c); ++poz; } } } Tabulatorii se găsesc la fiecare poziție TABINC TABINC este definit ca în acest program variabila pos este poziția în linia de text în care se află în prezent programul Dacă caracterul dat este o tabulație, programul calculează numărul de spații necesare pentru a ajunge la următoarea tabulatură Această valoare definește operatorul nb-TABINC - (poz - )% TABINC Dacă caracterul dat este o nouă linie, acesta este imprimat și pos este setat la începutul liniei (pos - ) Orice alt caracter este pur și simplu imprimat, crescând pos (+ + pos) TABINC este o constantă simbolică În cap În capitolul , veți învăța cum să transmiteți argumente funcției de formă și poate doriți să lăsați utilizatorul să stabilească numărul de coloane între file Atunci probabil că doriți să faceți din TABINC o variabilă Programul detab este extins în Exercițiile și Exercițiul (p CD) Scrieți un program de detașare care înlocuiește șiruri de spații cu numărul minim de spații și file necesare pentru a obține același spațiu gol Folosiți aceleași tabulaturi ca în detab Care este mai bine să acordați preferință: când este suficient o filă sau spațiu pentru a ajunge la oprirea tabulatorului? #inc!ude #define TABINC /* pas de increment de tab */ /♦ înlocuiți șiruri de spații cu tab-uri și spații */ mainO { int c, nb, nt, pos; nb - ; /* numărul necesar de spații */ nt - ; /♦ numărul necesar de file */ for(pos-l; (c-getcharO) Î-EOF; ++pos) if (cu -"){ dacă (poz % TABINC!- ) ++nb; /* crește numărul de spații ♦/ else{ nb - ; /* resetați numărul de spații */ ++nt; /• altă filă ♦/ } } altfel { pentru (;nt > ;-nt) putchar('\f); /• file de ieșire ♦/ dacă (cu - - *\t*) /♦ uită de spații */ nb- ; else /* scoate spații */ pentru (; nb > ;-nb) putcharf*); putchar(c); dacă (c -'W) pos-O; elseif pos-pos+ (TABINC - (pos- ) % TABINC) - ; } } Variabilele întregi nb și nt sunt numărul minim de spații și file necesare pentru a înlocui un șir de spații Variabila pos este poziția în linia de text în care se află în prezent programul Ideea este să găsim toate golurile Un șir de spații este înlocuit cu un caracter tabulator de fiecare dată când pos atinge o valoare care este divizibilă cu TABINC fără rest Când programul găsește un caracter care nu conține spații albe, tipărește tabelele și spațiile acumulate și apoi acel caracter Programul setează nb și nt la zero, iar dacă caracterul curent este o linie nouă, atunci poziționați la începutul liniei Dacă caracterul întâlnit este o filă, programul imprimă numai filele acumulate, urmate de acesta Când un singur spațiu este suficient pentru a ajunge la o oprire de tabulație, este mai ușor să-l înlocuiți cu un caracter de tabulație, de atunci evităm cazurile speciale Programul entab este extins în Exercițiile și Exercițiul (p CD) Scrieți un program care "împachetează" linii lungi de intrare în două sau mai multe linii scurte după primul caracter fără spații albe care apare înaintea a n-a coloană de intrare Asigurați-vă că programul dvs face ceva rezonabil cu linii foarte lungi, chiar dacă nu există spații sau file înaintea blocului specificat #include #define MAXCOL /* coloana de intrare maximă */ #define TABINC /* pas de increment de tab ♦/ linie de caractere [MAXCOL]; /* șir de intrare */ intexptab(intpoe); int findblnkdnt pos); int newposGnt pos); void prinți(int pos); /* împarte linii lungi de intrare în două sau mai multe linii mai scurte ♦/ mainO { int c, pos; poziție - ; /* pozitia liniei */ while ((c-getchar()) Î-EOF) { line [pos] - c; /* scrie caracterul curent */ if (cu *\t') /♦ extinde caracterul tabulator */ pos-exptab(pos); elseif (with '\n') { prinți (pos); /♦ imprimă linia de intrare curentă */ pos- ; } else if (++pos >- MAXCOL) { pos-findblnk(pos); prinți (pos); pos-newpos(pos); } } } /* prinți: print line up to column pos */ void prinți (int pos) { int i; pentru (i- ;i ) /* au fost tipărite caractere? */putchar('\n'); /♦ exptab: extinde file cu spații */ int exptab(intpos) linia [poz] -* *; /♦ Tab oferă cel puțin un spațiu ♦/ pentru (++pos; ditch && line [pos]!-") -poz; dacă (poz ) /• nu există spații în șir? */ returnează MAXCOL; else /* cel puțin un spațiu */ return poW; /* poziție după spațiu */ int newposGnt pos) { intij; dacă (poz -MAXCOL), retum ; /* nimic de realocat */ else{ i- ; pentru (j -pos; j void rcommentdnt c); void in comment(void); void echo quote(int c); /♦ elimina toate comentariile dintr-un program normal C */ mainO { int c, d; în timp ce ((c-getchar()) Î-EOF) rcomment(c); returnează ; /* rcomment: citiți fiecare caracter, eliminați comentariile */ void rcommentdnt c) { int d; if (c - ") if ((d-getcharO) - '♦*) in commentO; /* începutul comentariului */ elseif~(d- ') { putchar(c); /♦ secundă oblică ♦/ rcomment (d); }else{ putchar(c); /* nu este un comentariu */ putchar (d); } elseif (c *\" c "°) echo quote(c); /* începutul ghilimelelor */ else putchar(c); /♦ nu este un comentariu */ } /♦ in comment: în interiorul unui comentariu normal */ void în comment(void) { int c, d; c " getchar (); /* caracterul anterior */ d - getcharO; /♦ caracterul curent ♦/ while (c!- d!- ') { /* find end •/ CD; d-getcharO; } } /* echo quote: afișează caractere în ghilimele */ void echo quote(int c) { intd; putchar(c); while ((d - getcharO)!- c) { /♦ find end ♦/ putchar (d); dacă (d - 'W) putchar(getcharO); /* ignoră secvența de control */ /• secvența ♦/ } putchar(d); } Programul presupune că intrarea este un program C normal Funcția rcomment caută începutul comentariului (/♦), iar când îl găsește, apelează în comment Această funcție caută sfârșitul unui comentariu Astfel, întreaga procedură asigură că comentariul va fi ignorat Funcția rcomment caută și ghilimele simple și duble și, dacă este găsită, apelează echo quote Argumentul ecou-quote indică dacă au fost întâlnite ghilimele simple sau duble Funcția echo quote asigură că totul din interiorul ghilimelelor este redat cu acuratețe și nu este confundat cu un comentariu Funcția echo quote nu contează zo un ghilimele după o bară oblică inversă (vezi discuția despre secvențele de evadare la pagina a CD-ului și în Exercițiul ) Orice alt caracter este tipărit așa cum este Programul se termină când getchar returnează caracterul de sfârșit de fișier Exercițiul (p CD) Scrieți un program care verifică un program C pentru erori elementare de sintaxă, cum ar fi paranteze nepotrivite, paranteze pătrate sau acolade Nu uitați de ghilimele, atât duble, cât și simple, secvențe de evacuare și comentarii (Acest program este dificil dacă este realizat pentru toate cazurile ) #include int brete, brack, parente; void in quote(int c); void comment(void); voidsearch(intc); /* program care verifică erori elementare în programele C ♦/ mainO { int c; extern int brace, brack, paren; în timp ce ((c-getcharO) Î-EOF) { dacă (c - '){ if ((c - getchar ()) - - '♦') in comment(); /♦ în interiorul unui comentariu */ else căutare(c); }elseif(c - 'X" II c - '"') în ghilimele (c); /♦ în ghilimele ♦/ else căutare(c); if (acolada ) printf("Acolade nepotrivite Xn"); if (paranteză > ) printf ("Paranteze pătrate nepereche Xn"); dacă (părinte > ) printf("Paranteze nepotrivite Xn"); } /* căutare: căutarea erorilor de sintaxă elementară ♦/ void search (int c) { extern int brace, brack, paren; if (c '{') ++ brete; elseif (c-T> -bretele; elseif (c ++brack; elseif (c - ']') -brack; elseif (c-'(') ++parinte; elseif (c paren; } /* in comment in interiorul unui comentariu normal */ void in comment(void) { int c, d; c - getchar(); /♦ caracterul anterior •/ d - getchar(); /♦ caracter curent ♦/ while (c!- I d!- ') { /* find end ♦/ cd; d-getcharO; } } /* in quote: interior ghilimele */ void in quote(int c) { int d; în timp ce ((d - getcharO)!-c) /♦ găsi sfârșitul ghilimelelor ♦/ dacă (d -'W) getchar(); /* ignoră secvența de control */ /* secvența */ } Această soluție nu este făcută pentru toate cazurile Programul verifică trei tipuri de erori de sintaxă: paranteze nepereche, paranteze pătrate sau acolade Orice altceva este considerat normal Funcția de căutare crește acolade atunci când caracterul este o acoladă deschisă și o decrește atunci când este o acoladă de închidere Variabilele paranteze (pentru paranteze drepte) și paranteze (pentru paranteze rotunde) sunt tratate în mod similar În timpul căutării, variabilele acoladă, paranteză și părinte pot fi mai mari sau egale cu zero Dacă acolada, paranteza sau părintele devin negative, este o eroare; programul imprimă mesajul corespunzător [[ [ (brack este ) este valabil la un moment dat deoarece perechi Parantezele de închidere din dreapta pot fi găsite mai jos ] ] ] (paranteza este - ) - invalid, deoarece nu existau paranteze de deschidere asociate anterior cu aceste trei paranteze de închidere; dacă au fost, paranteza trebuie să fie Operatori dacă (acolada ; parente- ; } sunt necesare deoarece fără ele ) (, ]]][[[ sau }} {{ ar fi considerate perechi Funcția de formă caută *comentarii, ghilimele simple și duble și omite caracterele din interiorul lor Nici parantezele, parantezele și nici acoladele nu trebuie să fie asociate între comentarii sau ghilimele Programul efectuează o verificare finală a EOF pentru a vedea dacă mai sunt paranteze deschise Dacă există, se tipărește mesajul corespunzător capitolul Tipuri, operații și expresii Exercițiul (p din CD) Scrieți un program care determină intervalul de valori ale variabilelor de tip char, short, int și long, atât semnate (semnate) cât și nesemnate (nesemnate) prin tipărirea valorilor corespunzătoare din fișierele antet standard sau prin calcul direct Calculul este mai greu; definiți intervale de valori ale diferitelor tipuri de virgulă mobilă ♦ include ♦include /• definiți intervale de tipuri */ mainO { /• tipuri semnate ♦/ printf ("car min semnat - %d\n", SCHAR MIN); printf("max caracter semnat - %d\n", SCHAR MAX); printf("min scurt semnat - %d\n", SHRT MIN); printf("semnat scurt max - %d\n", SHRT MAX); printf("semnat int min - %d\n", INT MIN); printf("semnat int max - %d\n", INT MAX); printf("min lung semnat - %ld\n", LONG MIN); printf("semnat lung max - %ld\n", LONG MAX); /* tipuri nesemnate */ printf ("unsigned char min - %d\n", UCHAR MAX); printf("maximum scurt nesemnat - %d\n", USHRT MAX); printf("unsigned int min - %d\n", UINT MAX); printf("unsigned long max - %d\n", ULONG MAX); } Standardul de limbaj ANSI C specifică că intervalele trebuie definite în Intervalele pot diferi în funcție de utilizarea mașinii, deoarece dimensiunile short, int și long diferă în funcție de hardware ♦ include /* definește intervale de tipuri */ mainO /* tipuri semnate */ printf ("caracter semnat min - %d\n", •(char) ((caracter nesemnat) ~ " D); printf ("car max semnat - %d\n", (car) ((unsignedchar) -O " D); printf ("semnat scurt min - %d\n", -(scurt) ((nesemnat scurt) * " D); printf ("scurt semnat max - %d\n", (scurt) ((scurt fără semn) ~ " D); printf ("semnat int min - %d\n", •(int)((unsignedint) * " D); printf ("int max semnat - %d\n", (int) ((int fără semn) ~ " )); printf("semnat lung min - %ld\n", •Gong)((unsignedlong) * " D); printf ("semnat lung max - %ld\n", (lung) ((nesemnat lung) ~ " )); /* tipuri nesemnate ♦/ printf ("unsigned char min - %d\n", (unsigned char) ~ ); printf("unsigned short max - %d\n", (unsigned short max) - ); printf ("unsigned int min - %d\n", (unsigned int) ~ ) ; printf ("nesemnat lung max - %d\n", (nesemnat lung) ~ ); } O altă soluție posibilă utilizează operații pe biți (p a CD-ului) De exemplu, expresia (caracter) ((caracter nesemnat) ~ " ) ia și convertește fiecare bit în unu ~o apoi valoarea rezultată este convertită în caracter nesemnat (caracter nesemnat) ~ și mută caracterul nesemnat cu o poziție la dreapta pentru a șterge bitul de semn (caracter nesemnat) * " în cele din urmă convertiți valoarea în char (caracter) ((caracter nesemnat) * " ) Aceasta este valoarea maximă pentru un caracter cu semn Exercițiul (p din CD) Scrieți o buclă echivalentă buclei for specificate fără a utiliza && și Original: pentru (i- ; i -lim- ) okloop-NU; elseif ((c-getcharO) *\n') okloop-NO; elseif (c - EOF) okloop-NO; else{ s[i]-c; + ; } Fără && și , ar trebui să spargeți bucla for originală într-o secvență de instrucțiuni if În acest caz, schimbăm condițiile De exemplu, în bucla originală Klim-l înseamnă că sunt încă în limite În enunțul echivalent i>-lim-l înseamnă că i este în afara limitelor și bucla trebuie să se termine Variabila okloop este de tip enumerat Odată ce una dintre condiții este îndeplinită, okloop este setat la N și bucla se termină Exercițiul (p a CD-ului) Scrieți un program htoi(s) care convertește un șir de cifre hexazecimale (incluzând eventual x sau x) în valoarea sa întreagă echivalentă Numerele valide sunt - , a - f și A - F #define YES #defineNOO /* htoi: convertește șirul hexadecimal s în întreg */ int htoi (char s[]) { int hexdigit, i, inhex, n; i- ; if (s [i] - - 'O') { /♦ ignor opţional Ox sau Ox ♦/ I c dacă (s[i] *x* II s[i]-'X') ++i; Nu; /♦ valoare întreagă de returnat */ inhex - YES; /* se așteaptă o cifră hexagonală normală ♦/ pentru (; inhex - YES;++i){ dacă -' '&&s[i] - 'a* && s[i] "='P hexdigit-* [i] -'a' + ; else if - 'A' &&s[i] "='F'l hexdigit - s[i]-'A'+ ; altfel inhex - NU; /* nu este o cifră hexazecimală */ dacă (inhex-DA) n - * n+cifră hexadecimală; } returnn; } Operator pentru (; inhex-DA;++i) controlează funcția Variabila întreagă i - index în tabloul s Atâta timp cât s[i] este o cifră hexazecimală, inhex rămâne DA și bucla continuă Variabila hexdigit ia o valoare numerică între și Operator dacă (inhex-DA) asigură că s[i] este într-adevăr o cifră hexazecimală și valoarea sa este în hexdigit Când bucla se termină, htoi returnează valoarea lui n Această funcție este similară cu atei (pag a CD-ului) Exercițiul (p CD) Scrieți o versiune alternativă a squeeze(sl,s ) care ucide fiecare caracter din șirul sl care se potrivește cu un caracter din șirul s /*"}iere:distrugeți fiecare caracter din șir */ void squeeze(char sl [], char s []) { inti j, k; pentru (ik- ;sl[ ] !-'\ ';H+){ pentru (j- ;s [jl !-'\ '&&s [j] !-al[i];)++) if (s [j] '\ ') /* sfârşitul şirului - nu se potriveşte */ sl[k++]-sl[ij; al[k]-'\O'; } Primul operator pentru (ikO;sl[i] !-'\ ';H+) inițializează i și k - indexează sl și respectiv șir de ieșire (și sl) Fiecare caracter din sl care se potrivește cu orice caracter din s este distrus Bucla continuă până la sfârșitul șirului sl A doua instrucțiune for compară fiecare caracter din s cu caracterul sl[i] Această buclă se termină când s epuizează caracterele sau apare o potrivire Dacă nu există nicio potrivire, sl [i] este copiat în șirul de ieșire Dacă există o potrivire, operatorul if(s [jl-'\ ') nu este executat și sl [i) nu este copiat (aruncat) Exercițiul (p CD) Scrieți o funcție any(sl,s ) care returnează prima poziție din șirul sl care conține orice caracter din șirul s sau - dacă sl nu conține caractere din s (funcția standard de bibliotecă strbrk face același lucru, dar returnează un pointer la această poziție) /* apu: returnează prima poziție în sl unde apare orice caracter din s * tot apu(char sl(), char s []) { toți, j; pentru (i- ; sl [i] !-'\ ';H+) for(j- ;e (fl if (slfij s [jj) /*potrivire? ♦/ retum i; /* poziţia lui primul meci */ retum - ; * altfel nici o potrivire •/ ) Operator Goga-O^tp-'XO';!^) gestionează ciclul Când bucla se termină normal (sl a rămas fără caractere), apu returnează - pentru a indica că nu a fost găsit niciun caracter din s în sl A doua pentru declarație pentru (j- ;s [j] !-'\ ';J++) se efectuează pentru fiecare valoare a lui i Compară fiecare caracter din s cu sl[i] Când un caracter din s se potrivește cu sl [i ], funcția returnează i, prima poziție din șirul sl care a întâlnit un caracter din șirul s Exercițiul (p CG) Scrieți o funcție setbits(x, p, n, y) care returnează x, unde n biți, începând cu poziția p, sunt setați astfel: in spate ca cei n biți cei mai din dreapta din y, iar restul biților sunt neschimbați /* setbits: setați n biți în x la poziția p cu y biți */ unsijned setbits (unsițned x, int p, int n, unsifned y) { returnează x & ~(~(~O "n)"(p+ln)) I (y & ~(~O" n))" (p+ln); } Pentru a seta n biți în x așa cum sunt setați n biți din dreapta în y, XXX XPSH X XXX X uuuuuuuuuuuuuuu trebuie să ștergem acei n biți din x, să ștergem toți, cu excepția celor n biți din dreapta ai lui y și să-i deplasăm în poziția p, apoi să efectuăm o operație SAU pe biți asupra valorilor rezultate xxx xoooh xxx x LLC OppPO OOO XXX HPPXX XXX x Pentru a șterge acești n biți din x, efectuăm un AND pe biți cu un număr format din zero biți începând de la poziția p și unii din restul biților ~ "n mută un număr de toate cele n poziții la stânga, lăsând n zerouri în pozițiile corecte ~(~ "n) pune cele n poziții corecte și zerouri în rest ~(~ "n)"(p+ -n) mută aceste n în poziţia p, şi ~(~(~ " n)" (p+ -n)) setează n biți începând din poziția p la zero și toți ceilalți biți la x & -*(*'(-O "n)"(p + -n" noi pe biți și această valoare cu x pentru a șterge n biți din x, începând de la poziția p Pentru a șterge toți biții din y, cu excepția celor n biți din dreapta, executați un bit AND cu și unu, restul sunt zerouri ~(~ " p) setează n biți din dreapta la , restul la y &~(~ " n) $ selectează n biți drepti din y ȘI (y & ~(~ "n)) "(p+ -n) plasează acești n biți în poziția p x & ~(~(~ "n) " (rn-n)) I (y & ~(- "n)) " (pn-n) efectuează un SAU pe biți a două valori pentru a seta n biți în x, începând de la poziția p, la fel ca cei n biți din dreapta din y, fără a modifica restul biților Exercițiul (p CG) Scrieți o funcție invert(x,p,n) care returnează x unde n biți care încep de la poziția p sunt inversați (adică devine și invers), iar restul biților sunt neschimbați /* invers: inversează n biți în x, începând cu poziția p */ unsigned invertfunsigned x, int p, int n) retum x l ) { rbit - (x & ) "(lungimea cuvântului O - ); x - x " ; /♦ deplasați x o poziție la dreapta ♦/ x - xI rbit; /* completează rotația cu o poziție */ } retum x; } Variabila rbit ia bitul din dreapta al lui x și îl mută în poziția cea mai din stânga (lungimea cuvântului () - ) Apoi, deplasăm x o poziție la dreapta și facem un bit-OR cu rbit, completând astfel rotația cu o poziție Funcția rightrot se rotește de x n ori Funcția wordlength() numără lungimea unui cuvânt pe o anumită mașină /* wordlength: numără lungimea unui cuvânt mașină */ int wordlength (void) { inti; nesemnat v - (nesemnat) ~ ; pentru (i- ; (vv>l) > ;i++) retum i; } Iată o altă soluție: /* rightrot: "rotiți" x la dreapta n poziții */ rightrot fără semn (x fără semn, int n) { intwordlength(void); rbituri nesemnate; if ((nn % lungimea cuvântuluiO) > ) { bite - ~(~ m 'A' && c -*A* £&c { case AV: /• backslash ♦/ switch (t[++i]) { case 'n': /♦ caracter real nou linie * / s(jH-]-An'; pauză; case 't': /* caracter tabulator real */ wcm-I-'M'; pauză; implicit: /* toate celelalte caractere */ sQ++]-A\'; sQ++]-t[i]; pauză; } pauză; implicit: /♦ nu este o bară oblică inversă ♦/ eO++]-t[i]; pauză; sU?-AO'; } Declarația externă switch gestionează o bară oblică inversă sau orice alt caracter (implicit) Cazul backslash folosește o declarație switch diferită, la fel ca soluția anterioară Exercițiul (p CG) Scrieți o funcție expand( sl, s ) care extinde intrările scurte de forma az în șirul sl în lista completă corespunzătoare abc xyz în șirul s Ar trebui acceptate atât literele mari, cât și litere mici, precum și cifrele și fiți pregătiți să gestionați cazuri precum a-b-c, a-zO- sau -az Lăsați cratima principală sau "coada" să fie luată la propriu /* expand: extinde prescurtarea în sl în șirul s */ void expand (char sl [], char s []) { char c; inti, j; iJ- ; while ((c " sl [i++])!- '\ ') /♦ extrage caracterul din sl ♦/ if (sl [i] - && sl [HI] > -c) { i++; în timp ce (c : (x> > /* itoa: convertiți numărul n în caractere din șirul s - versiune modificată ♦/ void itoa(int n,char s[]) { int i, semn; void revers(caractere[]); semn-n; /* scrie semnul */ i- ; do { /* scoateți numere în ordine inversă */ s[H+] - abe(n % ) + ' '; /♦ obține următoarea cifră ♦/ } în timp ce ((n /- )!- ); /• eliminați-l •/ dacă (semn pe (p/- )!- căci dacă n ar rămâne negativ pe tot parcursul ciclului, ar fi infinit Exercițiul (p CG) Scrieți o funcție itob( n, s, b) care convertește întregul n în reprezentarea caracterelor în bază linia b din șirul s În special, itob( u, s, ) produce n ca un întreg hexazecimal în s /* itob: convertește numărul n în caractere din șirul s - baza b •/ void itoa(int n, char s[], int b) { int i, j, semn; void revers(caractere[]); dacă ((semn - n) ); /♦ șterge-l ♦/ dacă (semn /* itoa: convertiți numărul n în caractere din șirul s, w caractere late ♦/ void itoa(int n, char s[], int w) { int i, semn; void reverse(car s[]>; semn-n; /* scrie semnul */ i- ; do { /* scoateți numere în ordine inversă */ s [i++] - abs(n % ) + * '; /♦ obține următoarea cifră ♦/ } în timp ce ((n /- )!- ); /♦ șterge-l ♦/ dacă (semnul { int i, j, k, pos; pos-l; pentru (i- ; s[i] !-AO';i++){ pentru (ji, k- ; t[k] !- AO' && zT] - t[k]; j-n-, k++) dacă (k> aat[k] - AO') pos-i; } retum poz } Funcția strrindex este similară cu strindex (pag a CD-ului) Dacă strindex găsește o potrivire, returnează poziția primului element t în s În schimb, strrindex înregistrează acea poziție și continuă căutarea pe măsură ce funcția caută ultima (cea mai dreaptă) apariție a lui t în s: dacă (k>O£&t[k] - AO') pos-i; Iată o altă soluție posibilă: #include /* strrindex: returnează poziția celei mai din dreapta apariții a șirului t */ /* la s sau - dacă t nu este în s */ int strrindex (car s [], char t[]) { inti j, k; pentru (I-strien(s) - strlen(t); i >- ; i -) { pentru (ji, kO; t[k]!-A * &*s[j] - t[k]; j +, k++) tf (k>O&&t[k]-'\ ') returnează i; } întoarcere- ; } Aceasta este o soluție mai eficientă la aceeași problemă Programul începe la poziția "sfârșitul șirului s" minus lungimea șirului t Dacă nu există nicio potrivire, strrindex face un pas înapoi cu o poziție și încearcă din nou Odată ce strrindex găsește t în s, returnează i; i este deja poziția cea mai din dreapta unde apare t Exercițiul (p b CG) Extindeți funcția atof pentru a gestiona notația științifică a formei , e-b unde numărul în virgulă mobilă poate fi urmat de e sau E și de un exponent (eventual semnat) găsi /*atof: convertiți șirul a în număr dublu*/ double atof(char s[] > { val dublu, putere; int exp, i, si ; dacă(s[i] j ~ pentru (putere- , ; isdigit(s[i]); H+) { val- , ♦ val + (s[i] - ' '>; putere *- , ; } val - semn ♦ val / putere; dacă (s[i]-'e* s[i]-'E'){ semn-(s[++i]- dacă (s[i] s[i] pentru (exp - ; isdigit(s[i]); I++) exp - ♦ exp + (s[i] - * *); dacă (semn- ) în timp ce (exp-> ) /♦ exponent pozitiv ♦/ val *- ; altfel în timp ce (exp-> ) /♦ exponent negativ ♦/ val /- ; } return val; } Prima jumătate a programului este o copie a atof (p CD) Funcția omite caracterele delimitare, respectă semnul și calculează valoarea În acest moment, originalul atof returnează un număr, în timp ce versiunea modificată se ocupă de notația științifică A doua jumătate a funcției gestionează exponentul opțional Dacă nu există exponent, atof returnează numărul în val Dacă există, semnul său este stocat în variabila val, iar valoarea exponentului este calculată și stocată în exp operațiune finală dacă (semn- ) în timp ce (exp - > ) val *- ; altfel în timp ce (exp - > ) val /- ; ajustează numărul în funcție de valoarea exponentului Dacă este pozitiv, numărul este înmulțit cu ori exp Dacă este negativ, împărțiți După aceea, val conține valoarea finală, care este returnată programului apelant Variabila val este divizibilă cu , mai degrabă decât înmulțită cu , deoarece , nu este o parte exactă în reprezentarea binară Pe majoritatea mașinilor, , este reprezentat ca un număr puțin mai mic și, prin urmare, de ori , dă rareori , Împărțirea repetată cu este mai bună decât înmulțirea cu , , dar chiar și atunci există o pierdere de precizie Exercițiul (p CG) Odată dată structura de bază, este deschisă calea pentru extinderea calculatorului Adăugați un operator modulo (%) și aveți grijă de numerele negative #indude găsiți /♦ pentru atofO */ fdefine MAXOP /• dimensiunea maximă a operandului sau operatorului ♦/ #define NUMBER * ' /* semn că a fost găsit un număr •/ intgetop (char []); void push(dublu); pop dublu (void); /* calculator folosind notația poloneză inversă */ mainO { inttype; dublu op ; caractere[MAXOP]; while ((type-getop (s)) !-EOF) { comutator (tip) { caseNUMBER: push(atof(s"; break; caz**+': push(pop +pop()); pauză; cazul '♦*: push(popO * pop ); pauză; caz'-': op -pop(); push(pop - op ); pauză; cazul ': op -pop(); if (op - ) push (pop / op ); altfel printf ("Eroare: divizor zero\n">; break; caz '%': op -pop(); if(op - ) push (f mod (pop O, op )); altfel printf("Eroare: divizor zero\n"); pauză; caz *\n': printf("\t% g\n", pop O); pauză; Mod implicit: printf("Eroare: comanda necunoscuta %s\n", s); pauză; } } întoarce ; } Am făcut modificări la funcțiile principale și getop Funcțiile push și pop (p CU) rămân neschimbate Operatorul modulo (%) este tratat ca operator de divizare (/) Funcția de bibliotecă fmod calculează restul după împărțirea celor două elemente de sus ale stivei unul la altul Mai jos este getop-ul modificat: ♦include ♦include ♦include #define NUMBER * ' /* semn că a fost găsit un număr */ int getch(void); void ungetch(int); /* getop: obține următorul semn al operației sau operand numeric */ int getop (char s[]) { int c, i; în timp ce ((s[ ] -c-getchO) ' ' c '\f) s[l]'-'\ '; i- ; dacă (îisdigit(c) && cc! - '-') retum c; /♦ nu este un număr */ dacă (cu -V) dacă (este cifră (c-getO) s - V) s [++i] - cu; /* număr negativ ♦/ else{ if(c Î-EOF) ungetch(c); retum /♦ semnul minus ♦/ } if (isdigit(c)) /* selectează o parte întreagă */ while (isdigit(s[++i] - c-getch())) if (c - - ' ') /♦ extrage partea fracționară ♦/ while (isdigit(s[++i] - c-getch())) s[i]-'\ '; dacă (c Î-EOF) ungetch(c); retur NUMĂR; } Funcția getop analizează un caracter după semnul minus pentru a vedea dacă numărul este negativ De exemplu, - înseamnă un semn minus urmat de un număr, dar - , înseamnă un număr negativ Mânere avansate ale calculatorului: - + -io s % Prima expresie dă : +(- > A doua expresie dă - Exercițiul (p CG) Adăugați comenzi pentru a imprima elementul de sus al stivei fără a-l deschide, pentru a duplica acel element și pentru a schimba cele două elemente de sus Adăugați o comandă de curățare a stivei ♦include ♦include /* pentru atof O */ ♦define MAXOP /* dimensiunea maximă a operandului sau operatorului ♦define NUMBER ' ' /* indicaţie că a fost găsit un număr */ int getop (char []); void push(dublu); pop dublu (void); void clear(void); /* calculator folosind notația poloneză inversă */ mainO { inttype; dublu opl, op ; caractere[MAXOP]; while ((type-getop (s)) -EOF) { switch (type) { case NUMĂR: push (atof (s)); pauză; caz '+•: push(popO+pop()); pauză; caz push(pop() *pop()); pauză; caz op -pop(); push(pop O-op ); pauză; cazul ': op -pop(); if (op - ) push (pop / op ); else printf("Eroare: divizor zero\n"); pauză; case /• imprimă elementul superior al stivei •/op -pop(); printf("\t% g\n", op ); push(op ); pauză; case 'c*: /* clear the stack ♦/ clear O; pauză; case 'd': /* duplica elementul de sus al stivei */ op -pop(); push(op ); push(op ); pauză; case 's': /* schimbă primele două elemente */ opl -pop(); op -pop(); împinge(opl); push(op ); pauză; casc*\n*: printf("\t% g\n", pop O); pauză; implicit: printf ("Eroare: comandă necunoscută %s\n", s); pauză; } } return ; } Operatorul de nouă linie deschide elementul superior al stivei și îl imprimă Am adăugat un nou operator "?" care scoate elementul de sus din stivă, îl imprimă și îl împinge înapoi pe stivă Nu afișăm elementul de sus pentru totdeauna ca operatorul newline, ci folosim o secvență de pop, prinț și push pentru a împiedica mainul să știe despre variabilele stivei sau ale poziției stivei Pentru a duplica elementul de sus al stivei, deschideți acel element și deschideți-l înapoi de două ori Schimbăm primele două elemente ale stivei, eliminându-le și punându-le în ordine inversă Ștergerea stivei este ușoară, doar setați sp la Așa că am adăugat o nouă funcție care face exact asta și am introdus-o cu apăsare și pop Astfel, numai funcțiile care conștientizează stiva au de-a face cu variabilele de poziție a stivei și a stivei /* seear: clear stack */ void clear(void) {sp-O; } Exercițiul (p din CD) Adăugați acces la funcțiile bibliotecii, cum ar fi sin, exp și pow (vezi în anexa B, secțiunea (p )) ♦include ♦include ♦include /♦ pentru atof() •/ ♦define MAXOP /* dimensiunea maximă a unui operand sau operator */ ♦define NUMBER * ' /* indicație că a fost găsit un număr */ ♦define NAME 'n' /* indicație că a fost găsit un nume */ int getop (car [ ]); void push(dublu); pop dublu (void); void mathfnc(char[]); /* calculator folosind notația poloneză inversă */ mainO { inttype; dublu op ; caractere[MAXOP]; while ((type-getop (s)) Î-EOF) { switch (type) { case NUMĂR: push(atof(s)); pauză; caseNAME: mathfnc(e); pauză; caz *++: push(pop() +pop()); pauză; caz *♦': push(pop * popO); pauză; caz'-*: op -pop(); push(pop - op ); pauză; caz'/*: op -pop(); if (op !- ) push(pop() /op ); else printf("Eroare: divizor zero\n"); break; caz *\n*: printf("\t% g\n", popO); pauză; Mod implicit: printf("Eroare: comanda necunoscuta %s\n", s); pauză; } } returnO; } /♦ mathfnc: verificați șirurile de caractere pentru */ /* funcție matematică acceptată */ void mathfhc(car s []) { dublu op ; dacă (strcmp(s, "păcat") ) împinge (sin (popO)); else if (strcmpte, "cos") ) pu h(cos(popO)); else if (strcmp(s, "exp") ) push(exp(pop())); else if (strcmp(s, "pow") - - ) { op -pop(); push(pow(pop(), op )); }altfel printf("Eroare: %s nu este acceptat\n", s); } Fișier sursă pentru getop modificat: ♦include ♦include ♦include ♦definiți NUMĂR * * /* semn că a fost găsit un număr */ ♦define NAME *n* /* pentru a indica faptul că a fost găsit un nume */ int getch (void); void ungetch(int); /* getop: obține următorul semn de operație, operand numeric */ /♦ sau funcție matematică ♦/ int getop(car s[]) { int c, i; în timp ce ) returnează NUME; /* > caracter, acesta este numele */ else întoarcere c; /* poate aceasta este o comandă */ } dacă (lisdigit(c) && c!-' ') returnează c; /* nu este un număr ♦/ if (isdigit (c)) /* selectează partea întreagă ♦/ while (isdigit(s[++i] -c-getch())) if (cu - - ' ') /♦ selectează partea fracționară ♦/ while (isdigit(s [++i] - with - getch())) s[i]-*\ *; if (c -EOF) ungetch (c); returnează NUMĂR; } Am modificat getop pentru a lua un șir cu minuscule și a-l returna ca NAME Funcția principală consideră NUME ca unul dintre tipurile posibile și apelează mathfnc Funcția mathfnc este nouă Ea execută o secvență de instrucțiuni if până când găsește un nume de funcție care se potrivește cu șirul s sau raportează o eroare Dacă șirul s este una dintre funcțiile acceptate, mathfnc scoate numărul corespunzător de operanzi din stivă și apelează o funcție matematică care returnează valoarea, iar mathfnc o împinge înapoi în stivă ȘI De exemplu, "păcatul așteaptă un argument în radiani și sinusul lui PI / este egal cu unu /sin Prima operație împarte PI cu și împinge rezultatul înapoi în stivă Funcția sin scoate elementul de sus din stivă, calculează sinusul și, de asemenea, împinge rezultatul înapoi Rezultatul este egal cu unu /sin cos+ dă , deoarece sinusul lui PI / este și cosinusul lui este unu Alt exemplu, pow pow+ Ridică la puterea lui , la puterea lui și adună cele două valori Funcția getop nu știe nimic despre anumite nume de funcții, returnează doar șiruri de caractere pe măsură ce sunt primite Astfel, calea este deschisă pentru extinderea mathfnc prin adăugarea de noi funcții Exercițiul (p CD) Adăugați comenzi pentru a lucra cu variabile (Este ușor să organizați douăzeci și șase de variabile cu o singură literă ) Adăugați o variabilă pentru ultima valoare imprimată ♦include ♦include /♦ pentru atof O ♦/ ♦definiți MAXOP /* dimensiunea maximă a operandului sau operatorului ♦define NUMBER ' ' /* indicaţie că a fost găsit un număr */ int getop (char []); void push(dublu); pop dublu (void); /* calculator folosind notația poloneză inversă */ mainO { int i, tip, var- ; dublu op ,v; caractere[MAXOP]; variabilă dublă [ ]; pentru (i - ; i ) push(popO /op ); else printf("Eroare: divizor zero\n"); pauză; caz'-': popO; dacă (var > - 'A' && var - 'A' && tip /* ungets: returnează un șir la intrare */ void ungets(chars[)) { intlenstrien(e); void ungetch(int); • în timp ce(len> ) ungetch(s[-len]); } Variabila len conține numărul de caractere din șirul s (cu excepția terminației "\ "), care este determinat de funcția strlen (p a CD-ului) Funcția ungets apelează subrutina ungetch (p KP) len times, returnând de fiecare dată caracterul din șirul s la intrare și returnează șirul în ordine inversă Funcția ungets nu trebuie să știe despre buf sau buff Funcția ungetch gestionează buf, buf și efectuează verificarea erorilor Exercițiul (p CD) Să spunem că nu va returna niciodată mai mult de un personaj Schimbați getch și ungetch pentru a se potrivi #include charbuf- ; /♦ getch: obține caracterul (posibil returnat) */ int getch (void) { int c; dacă (buf!-O) c-buf; etoe c-getcharO; buf-O; întoarcere c; ) f /* ungetch: returnează un caracter la intrare */ void ungetch(int c) ( if(buf!-O) printf ("ungetch: prea multe caractere\n"); else buf-c; } Buffer-ul buffer nu mai este un tablou, deoarece nu poate exista mai mult de un caracter în buffer la un moment dat Variabila buf este inițializată la zero în timpul încărcării și getch resetează buf la de fiecare dată când primește un caracter Dacă memoria tampon nu este goală, ungetch emite un mesaj de eroare Exercițiul (p CD) Funcțiile getch și ungetch nu gestionează corect EOF returnat Gândiți-vă ce proprietăți ar trebui să aibă dacă EOF este returnat și implementați soluția dvs #include #define BUFSIZE int buf[BUFSIZE]; /* ungetch buffer */ intbufp - ; /* o altă poziție liberă în buf */ /* getch: obține caracterul (posibil returnat) */ int getch(void) { return (bufp > ) ? buf [-bufp] : getcharO; /* ungetch: returnează un caracter la intrare */ void ungetch(int c) { if (bufp >-BUFSIZE) printf ("ungetch: prea multe caractere\n"); else buf[bufp++] - cu; În funcțiile getch și ungetch (c KP), buffer-ul buf este declarat ca o matrice de caractere: charbuf[BUFSIZE]; Limbajul de programare C nu necesită ca o variabilă caracter să fie semnată (semnată) sau nesemnată (vezi p a CD-ului) Dacă un caracter este convertit într-un număr întreg, cel mai adesea nu ar trebui să producă un număr negativ Pe unele mașini, dacă bitul din stânga al unui caracter este , acesta va da un număr negativ atunci când este convertit la int Pe alte mașini, tipul char este convertit în int prin adăugarea de zerouri în stânga O astfel de conversie va da întotdeauna un număr pozitiv, indiferent dacă bitul din stânga a fost unul În notație hexazecimală, - este xFFFF (pentru biți) Dacă OxFFFF este scris într-o variabilă char, numărul OxFF este de fapt scris Când OxFF este convertit în int, poate da OxOOFF, adică sau xFFFF, adică - număr negativ (- ) -> caracter -> întreg OxFFFF OxFF OxOOFF ( ) xFFFF xFF xFFFF(-l) Dacă vom trata EOF (- ) ca orice alt caracter, buf trebuie să fie declarat ca o matrice de numere întregi: intbuf[BUFSIZE]; Astfel, nu vor avea loc conversii și EOF (- ) sau orice alt număr negativ va fi gestionat într-un mod portabil Exercițiul (p CD) Organizația alternativă folosește getline pentru a citi o linie din intrare, astfel încât getch și ungetch nu sunt necesare Modificați programul calculatorului pentru a utiliza această abordare #include finclude fdefine MAXLINE fdefine NUMBER ' * /* pentru a indica faptul că a fost găsit un număr */ int getline(char line [], int Urnit); int li - ; /• index șir de intrare ♦/ charline[MAXLINE]; /* șir de intrare •/ /♦ getop: obține următorul semn al operației sau al operandului numeric ♦/ int getop (car s []) { int c, i; dacă (linia [li]-AO") if (getline (line, MAXLINE) - ) retum EOF; altfel li- ; în timp ce ((s[ ] -c-line[li++]) - ' ' c '\f) s[l]-AO*; i- ; if(!isdigit(c)Mc retum c; /♦ nu este un număr ♦/ i- ; if (isdigit(c)) /* selectează partea întreagă ♦/ while (isdigit(s[++i] -c-line[lH+])) if (c - - ' *) /* selectează partea fracționară ♦/ while (estedigit(s [++i] - c - line[ H+])) s[i]-'\O'; li-; retur NUMĂR; } În loc de getch și ungetch în funcția getop, folosim getline line este un tablou care conține întreaga linie introdusă la un moment dat; Și este indexul pentru următorul caracter din rând Am creat variabile externe linie și U astfel încât acestea să-și păstreze valorile între apeluri, spre deosebire de variabilele locale Dacă getop este la sfârșitul liniei (sau linia nu este încă acolo) dacă (linia[li]-AO') apelează la getline pentru a obține o linie În getop original (p ) funcția apelează getch de fiecare dată când are nevoie de un alt caracter În această versiune, obținem caracterul la poziția i în linie și apoi incrementăm i La sfârșitul funcției, în loc să apelăm ungetch pentru a returna un caracter, reducem i pentru că am mutat un caracter mai departe Amintiți-vă că orice funcție poate folosi și modifica variabile externe, deci i și linia pot fi modificate de o altă funcție decât getop Uneori trebuie să preveniți un astfel de caz, atunci ar trebui să declarați variabilele ca Statice Nu am făcut asta deoarece variabilele statice nu sunt discutate până la CD p Exercițiul (pag CG) Schimbați getop, astfel încât să nu fie nevoie să utilizați ungetch Sugestie: utilizați o variabilă statică găsi găsi \ #define NUMBER 'O' /* semn că a fost găsit un număr ♦/ int getch (void); /* getop: obține următorul semn al operației sau operand numeric */ int getop (char s[]> { int c, i; static int lastc - ; - if (lastc ) c-getchO; altfel{ c - lastc; lastc - ; în timp ce ((s[ ] -c) * * II c '\f) c-getchO; s[l]-'\ '; dacă (! este cifra(c) întoarcere c; /♦ nu este un număr ♦/ i- ; if (isdigit (c) > /* obține partea întreagă ♦/ while (isdigit (s[++i] -c-getch())) if (c - - * ') /♦ selectează partea fracționară ♦/ while (isdigit(s[++i] - c-getch())) s[i]-*\ *; dacă (c!-EOF) a "fr" c; returnează NUMĂR; } Am schimbat getop pentru a avea o variabilă statică care își amintește ultimul caracter care va fi returnat la intrare Deoarece nu folosim funcția ungetch, salvăm acest caracter în lastc Când funcția getop este apelată, ea verifică dacă lastc conține caracterul anterior Dacă nu, funcția apelează getch pentru a obține unul nou Dacă există, getop îl copiază în c și setează lastc la zero Prima declarație while s-a schimbat puțin Motivul este că funcția are nevoie doar de următorul caracter după ce a examinat caracterul curent din c Exercițiul (p CD) Aplicați ideile printd pentru a scrie o versiune recursivă a itoa, i e convertiți întregul într-un șir apelând procedura recursivă #include /* itoa: convertiți n în caractere din șirul s; recursiv * / void itoa(int n, char s[]) { static int i; if (n/ ) itoa(n/ , s); altfel{ i- ; dacă (n /* invers: inversează șirul s în loc */ void reverse (car s []) { void inversor(char s[], int i, int len); inversor(e, , strlen(e)); } /* inversor: inversează șirul s în loc; recursiv */ void inversor(char s[], int i, int len) { int c, j; jlen -(i+ ); dacă (i j) Aceasta nu este cea mai bună utilizare a recursiunii Unele probleme cer ele însele o soluție recursivă - vezi, de exemplu, funcția treeprint la p CR Altele sunt cel mai bine rezolvate fără recursivitate A fost unul dintre aceia Exercițiul (p CD) Realizați o macrocomandă swap(t,x,y) care schimbă valorile celor două argumente de tip t (O structură cu casetă ar fi utilă ) "definiți iwap(t, x, y) {t x; \ Acoladele sunt folosite pentru a defini un nou bloc Puteți declara variabile locale la începutul unui bloc z este o variabilă locală de tip t care ajută la schimbul a două argumente Această macrocomandă funcționează dacă niciunul dintre argumente nu este o variabilă z Dacă unul dintre argumente este numit z wap(int,x, z); atunci când o macrocomandă este extinsă, aceasta devine {int z; z- z; z-x; x- z;} iar argumentele nu sunt schimbate Se presupune că z nu va fi folosit ca nume de variabilă capitolul Pointere și matrice Exercițiul (pag CG) * Funcția getint pe care o scrieți consideră un + sau nu urmat de o cifră ca o reprezentare validă a zero Corectați funcția astfel încât să returneze un astfel de caracter la intrare ♦include ♦include int getch(void); void ungetch(int); /♦ getint: obține următorul întreg de la intrare în #pn •/ int getint (int *pn) { int c, d, semn; while (isspace(c - getch())) /* omite spații ♦/ if (lisdlgit(c) &&c -EOF &&c - '+' DOc !-■*-') { ungetch(c); /* acesta nu este un număr */ returnează ; } semn-(c - ,-,)?-l:l; dacă (c -II c - '-'){ DC; /* amintiți-vă simbolul semnului •/ if (!isdigit(c-getchO)) { if (c -EOF) ungetch (c); /* acesta nu este un număr - revine la intrare */ ungetch (d); /* returnează caracterul semn la introducere */ return d; /♦ caracter semn de întoarcere */ } } pentru (*pn- ; iadigit(c); c-getchO) ♦pn - ♦ *pn + (cu - 'O'); ♦pn *-semn; dacă (c -EOF) ungetch(c); întoarcere c; } Când apare un caracter semn, getint îl stochează în variabila d și ia următorul caracter Dacă nu este o cifră și EOP, getint o returnează la intrare Apoi distracție Acțiunea returnează un caracter la intrare, precum și la programul apelant pentru a indica situația Exercițiul (p CG) Scrieți o funcție getfloat, analogă cu getint pentru numere în virgulă mobilă Ce tip de valoare este returnată de funcția getfloat? ♦include ♦include int getch(void); void ungetch(int); /♦ getfloat: obține următorul float de la intrare */ int getfloat(float *pn) { int c, semn; putere de plutire; while (isspace(c - getchO)) /♦ sări peste spații ♦/ dacă (îisdigit(c) && c!- EOF && c!- '+' && c!- &&c!- ' ') { ungetch(c); /♦ nu este un număr */ return ; } semn- (c *-*) ?-l: ; dacă (c - '+' II c - '-•) c - getchO; pentru (♦pn-OO; isdigit(c); c-getchO) ♦pn - , ♦ *pn + (c - * *); /♦ parte întreagă ♦/ if(c -V) c-getchO; pentru (putere- ; isdigit(c); c - getchO) { ♦pn - , ♦ *pn + (c - • ' '); /♦ parte fracționară ♦/ putere •- , ; } ♦pn ♦- semn / putere; /• număr final •/ if (c Î-EOF) ungetch (c); retum c; } Funcția getfloat este similară cu getint (c Klb Omite spații, scrie semnul - și stochează partea întreagă a numărului la adresa din pn Funcția getfloat se ocupă și de partea fracțională a numărului (dar nu notația științifică) Partea fracțională se adaugă la *pn la fel în același mod ca și întregul: x *rn- , **rn+(c -* '); Pentru fiecare cifră găsită după virgulă zecimală, variabila putere este înmulțită cu De exemplu, dacă punctul zecimal este urmat de cifre, puterea este , dacă una este , dacă trei este Funcția getfloat înmulțește apoi valoarea finală *pn cu suspin/putere pentru a obține o valoare în virgulă mobilă Returnează fie codul EOF, fie codul ASCII al primului caracter după float Tipul funcției este int Exercițiul (CR p ) Scrieți o versiune pointer a strcat (funcția prezentată în capitolul : strcat(s,t) copiază șirul t la sfârșitul lui s) /* strcat: copiază șirul t la sfârșitul șirului s; */ /♦ versiunea pointer ♦/ void strcat (char *s, char *t) { în timp ce (*s) în timp ce Gun- ♦n+) } Inițial, s și t indică începutul șirurilor de caractere Prima buclă while incrementează indicatorul s până găsește marcatorul de sfârșit de linie C\ ') Operator în timp ce (*s) adevărat până când caracterul curent este un caracter de sfârșit de linie A doua buclă while adaugă șirul t șirului s: în timp ce (*s++- *H+) * Acest operator atribuie *s oricărui caracter se află în *t, incrementează ambii pointeri și continuă așa până când t indică caracterul de sfârșit de linie Exercițiul (pag CG) Scrieți o funcție strend(s,t) care returnează dacă șirul t este la sfârșitul șirului s și în caz contrar /♦ string: returnează dacă șirul t este la sfârșitul șirului s */ /* și în caz contrar ♦/ int strend(char*s, char*t) char*bs-s; /* scrie începutul rândurilor */ char*bt- ; pentru (; *s; hm-) /♦ capăt de linie s ♦/ pentru (; *t; H+) /• capăt de linie t ♦/ pentru (; *s *t;s-, t-) dacă (t-btlls-be) rupe; /* începutul unei linii •/ dacă (N-*t && t-bt && *s!-AO') returnează ; altfel întoarce ; } Stocăm adresele începutului liniilor în pointerii bs și bt și apoi găsim sfârșitul fiecărei linii în același mod ca în funcția strcat Pentru a determina dacă șirul t este conținut la sfârșitul șirului s, începem să comparăm ultimul caracter al lui s cu ultimul caracter al lui t și trecem la începutul șirurilor Funcția strend returnează (șirul t este la sfârșitul șirului s) când caracterele lui t se potrivesc cu caracterele lui s, indicatorul t este din nou la începutul șirului și șirurile nu sunt goale: dacă (N - *t && t - bt && *s! - AO') returnează ; Exercițiul (CG p ) Scrieți versiuni ale funcțiilor de bibliotecă stmcpy, stmcat, stmcmp care funcționează cu cel mult n caractere de șiruri de argumente De exemplu, stmcpy(s,t,n) copiază cel mult n caractere de la t la s Descrierile complete ale funcțiilor sunt în Anexa B (p CG) Funcțiile stmcpy și stmcat sunt de tip void, ca strcpy la p CR Versiunile de bibliotecă ale acestor funcții returnează un pointer la începutul șirului dat /♦ stmcpy: copiați n caractere din șirul t în șirul s */ void stmcpy (char *s, char *t, int n) { în timp ce (*t && n - ) în timp ce (n - ) ♦sh-A '; /* stmcat: copiați n caractere din șirul t până la sfârșitul șirului s */ void stmcat (char *s, char *t, int n) { void stmcpy (char *s, char *t, int n); intstrlen(char*); stmcpy(s+strlen(s), t, n); } /* strncmp: comparați cel mult n caractere din șirurile t și s */ int strncmp (char *s, char *t, int n) { pentru (; *s- *t; BH- H+) dacă (♦s '\ ' II - n /♦ getline: citiți linia la s, lungimea returnării */ int getline (char *s, int lim) { int c; char *t - s; în timp ce (- lim > && (c-getcharO)!-EOF && c!-An') ♦s++-c; dacă (c 'W) ♦s++-c; ♦s-'\ '; returs-t; } Funcția getline primește un pointer către o matrice de caractere Folosim *s în loc de s[i] pentru a ne referi la un element de matrice și incrementăm s pentru a avansa în matrice Operator s[i++] -c; echivalent ♦sw c; Funcția s indică mai întâi la începutul matricei și stocăm acea adresă în pointerul t: diagrame; După ce getline a citit linia, s indică spre finalul C\ ') t indică în continuare primul caracter din șir, deci lungimea șirului este st #include /♦ aloi: convertește șirul s în întreg; ♦/ /* versiunea pointer ♦/ intaloi(char*s) { int n semn; pentru (; isspace(*s) ; ext*> /♦ skip spaces ♦/ semn-(*s- dacă (*s - - ll *s '-') /♦ sări peste semn ♦/ s++; pentru (n - ; isdigit(*s); bh-) n- *n + *s - 'O'; semnul retur*n; } Notația s [i ] este echivalentă cu *s, așa cum [i++] este echivalent cu *sh- void revers(char*); /* itoa: convertiți n în caractere pe linia */ /♦ versiunea pointer ♦/ void itoa (int n, char*s) { semn int; diagrame; /♦ stochează indicatorul spre șirul s ♦/ dacă ((semn - n) /* invers: inversează șirul s în loc */ nul revers(car*s) { int c; diagramă; pentru (t - s + (strlen(s)-l); s t && *r-'\ '> întoarcere s-b; } întoarcere- ; } Intrarea s[i] a fost înlocuită cu *s, s[j] cu *p, at[k] cu *v Variabila b este un pointer către un caracter, setat întotdeauna la primul element al șirului s (s[ ]> Expresia p • s este echivalentă cu i"j, iar r "t este echivalent cu k - Dacă afirmația if este adevărată dacă (r>t***r-'\ ') atunci există o potrivire și stringindex returnează indicele t din șirul s: retum s-b; Bindude /* atof: convertiți șirul a în dublu ♦/ /♦ versiune pointer */ double atof (char *s) { val dublu, putere, semn int; forX; isspace(*s); gn>) /• sări peste spații ♦/ semn-(* -*-')?-l:l; dacă (♦s-W' II ♦v - '-') s++; pentru (val - , ; isdigit(*s); s++) val- , * val+(h-nh); dacă (H-V) D | | ~ pentru (putere- , ; isdigit(*s); s++) { val- , * val + (*s -' '>; putere *- , ; semn retum * val / putere, } Expresia [i++l este echivalentă cu *sh- Binclude Binciude Bdefine NUMĂR 'O* /* semn că a fost găsit un număr ♦/ int getch (void); void ungetch(int); /♦ getop; obține următorul semn de operație sau operand numeric ♦/ /* versiunea pointerului •/ int getop(car*s) { int c; în timp ce ((♦sc-getchO) * llc '\t'> ♦(sil) -'\ '; if (!isdigit(c) && cc!- '-') return c;/♦ nu este un număr ♦/ " if (isdigit(c)) /♦ selectează o parte întreagă ♦/ while (isdigit( ' #define MAXLEN /♦ lungime maximă a liniei */ #define MAXSTOR /♦ dimensiunea memoriei disponibilă */ int getline(char ♦, int); /* readlines: citiți liniile de intrare */ int readlines (char *lineptr [], char •linestor, int maxlines) { int len, nlines; charline[MAXLEN]; char #p-linestor, char *llnestop - linestor+MAXSTOR; nlinii "* ; în timp ce "len-getlinedine, MAXLEN)) > ) dacă (nlines > - maxlines pHen > linestop) return- ; altfel{ linia [len- ] - *\ *; /• distruge caracterul newline ♦/ strcpyCp, line); lineptr[nlines++] -p; p*len; } linie de retur; } Funcția principală alocă o matrice de linestor, unde readlines scrie textul linie cu linie Pointerul p este setat la primul element al liniei: char *p-linestor Funcția inițială readlines (pag CG) folosește funcția aloc (pag CG): if (nlines >"maxline" (p-alloc(len)) NULL) În această versiune, readlines scrie linia în linestor începând cu poziția p Operator if (nllne "> -maxline" p + len > linestor) află dacă există spațiu liber în matricea linestor Această versiune de readlines este puțin mai rapidă decât cea originală Exercițiul (pag CG) Nu există nicio verificare a erorilor în funcțiile day of year și month day Corectați acest neajuns static char daytab [ ] [ ] -{ { , , , , , , , , , , , , }, { , , , , , , , }, /♦ day of year: setați numărul ordinal al zilei din an •/ /♦ după lună și zi ♦/ int day of year(int year, int month, int day) { int i, salt; an bisect% &&year% !- an% ; dacă (lună ) returnează - ; dacă (ziua tabul zilei[salt] [lună]) returnează - ; pentru (i - ; i daytab [salt] [i]; i++), yearday daytab [salt] [i]; if (i > && yearday > daytab [salt] [i]) { ♦pmonth !; ♦pday l; }altfel{ ♦plună - i; ♦pday - ziua anului; } } În funcția day of year, verificăm dacă există valori rezonabile în lună și zi Dacă luna este mai mică de unu sau mai mare de doisprezece, ziua din anul returnează - În funcția mohth day, verificăm mai întâi dacă variabila an este negativă În continuare, începem să scădem year day, verificând dacă luna (indicele i) este mai mare decât Dacă bucla se termină cu luna egală cu și yearday este mai mare decât numărul de zile din ultima lună a anului, atunci variabila yearday începe de la valoarea greșită și atribuim valoarea lunii și zilei - În caz contrar, funcția month day a primit valorile corecte Exercițiul (SL CR) Rescrieți funcțiile day of year și luna zi folosind pointeri în loc de indexare static char daytab [ ] [ ] - { {O, , , , , , , , , , , , }, {O, , , , , , , , , , , , }, /♦ ziua a anului: setați numărul ordinal al zilei din an ♦/ /♦ după lună și dată •/ int day of year(int an, int luna, int zi) { int salt; char*p; an bisect% ~- &&year% !- ani% ; p-daytab [salt]; in timp ce (- luna) ziua - *++p; ziua intoarcerii; /♦ luna zi: Setați luna și ziua la ziua anului*/ void monthday (int year, int yearday, int *pmonth, int *pday) { int salt; char*p; an bisect% dr&year% !- an% ; p- daytab [salt]; în timp ce (yearday > *++p) yearday *p; ♦pmonth - p - ♦ (daytab + leap); ♦pday-yearday; } Pointerul p este setat pe primul sau al doilea rând al matricei daytab, în funcție de valoarea leap p " daytab [salt]; Bucla for din funcția originală day of year pentru (i - ; i daytab[salt] [i]; i++) yearday daytabfleap] [i]; este echivalent cu operatori p-daytab[salt]; în timp ce (yearday > *++p) yearday *p; în luna zi convertită Exercițiul (cl KP) Scrieți un program expr care evaluează expresia inversă poloneză din linia de comandă, unde fiecare operand sau semn de operator este un argument separat De exemplu, expr +♦ calculează x( + ) ♦include ♦include /♦ pentru atof O ♦/ ♦definiți MAXOP /* dimensiunea maximă a operandului sau operatorului ♦/ ♦define NUMBER ' * /♦ indicaţie că a fost găsit un număr */ int getop(char []); void ungets(char[]); void push(dublu); pop dublu (void); /* calculator folosind notația poloneză inversă; */ /* folosește linia de comandă */ main(int argc, char *argv[]) { caractere[MAXOP]; dublu op ; în timp ce ( argc> ) { ungetsC "); /♦ "return" terminatorul argumentului ♦/ ungets(*++argv);/* "return" argumentul în sine •/ switch (getop(s)) { case NUMBER: împinge(atof(e)); pauză; cazul '+*: push(popO+pop()); pauză; caz push(pop*pop()); pauză; caz *-*: op -pop(); push(pop - op ); pauză; cazul ': op -pop(); if (op !- ) push (pop O / op ) ; else printf("eroare: divizor zero\n"); pauză; Mod implicit printf("eroare: comanda necunoscuta %s\n", c); argc- ; pauză; } printf("\t% g\n", pop O); întoarce ; } Această soluție se bazează pe calculatorul din CG p folosind notația poloneză inversată Funcțiile push și pop se aplică aici (p KR) Folosim funcția ungets pentru a returna marcajul final al argumentului și argumentul în sine în buffer-ul de intrare Astfel, putem lăsa funcția getop neschimbată Funcția getop apelează getch pentru a citi caracterele și a obține noul semn al operației sau al operandului numeric Dacă apare o eroare în timpul citirii argumentelor, variabila argc este setată la Condiția de buclă while din funcția min în timp ce (-argc > ) devine fals și programul se încheie Pentru o expresie validă, rezultatul este în partea de sus a stivei și tipărim acel rezultat când lista de argumente se termină Exercițiul L (sL KR) Modificați programele entab și detab (scrise ca exerciții pentru Capitolul ) pentru a lua o listă de tabulaturi ca argumente Dacă nu există argumente, utilizați lista implicită de tabulaturi #iiiclude fdefine MAXLINE /* dimensiune maximă a liniei */ fdefine TABINC /* pas implicit de creștere a filei */ #defineYESl #defineNOO void settab(int argc, char *argv[], char *tab); void entab(char*tab); int tappos(int pos, char *tab); /* înlocuiește liniile de spații cu tab-uri */ main(int argc, char *argv[]) { chartab[MAXUNE+l]; settab(argc, argv, tab); /* setează puncte de tablă */ entab(tab); /* înlocuiește spațiile cu tab-uri */ returnează ; ( } /* entab: înlocuiți șiruri de spații cu tab-uri și spații ♦/ void entab(char *tab) { int c, pos; int nb - ; /* "numărul necesar de spații */ int nt - ; /* "numărul necesar de file ♦/ pentru (pos - G, (c-getchar()) !-EOF; pos++) if(c *'){ if (tabpos(pos, tab) - - NU) ++nb; /* crește numărul de spații */ else{ nb - ; /* resetează numărul de spații */ ++nt; /♦ altă filă ♦/ } }else{ for (; nt > ; nt -) putchar('\t*); /* file de ieșire */ if (c '\f) /• uită de spații ♦/ nb- ; else /* spații de ieșire */ pentru (;ifb>O; nb) putcharC '); putchar(c); dacă (c '\n') pos-O; elseif (c 'W) while (tabpos(pos, tab)!-YES) ++pos; } } Fișier sursă settab c: "include "define MAXLINE /* dimensiunea maximă a liniei */ "define TABINC /* implicit tab increment */ "define YES "define N void settab(int argc, char *argv[], char *tab) { int i, pos; dacă (argc ) { /* trece prin lista de argumente */ pos-atei (*++argv); dacă (poz> &&pos MAXLINE) tabfpos]-DA; } } } Fișier sursă tappos c: ♦definiți MAXLINE /* dimensiunea maximă a liniei */ ♦definiți YES /* tabpos: determină dacă pos este o poziție de tab */ int tabpos (int pos, char *tab) { dacă (poz > MAXLINE) retur DA; altfel retum tab [poz]; } Această soluție se bazează pe programul entab din cartea lui Kernighan și Plodger, Software Tools (Addison-Wesley, ) Fiecare element din matricea file corespunde unei poziții în rând, adică fila [ ] se potrivește cu prima poziție (poz este ) Dacă poziția dată este un opritor de tablă, tabulatorul corespunzător [i J elementul este DA, în caz contrar NU Tabulatorii sunt setate în funcția settab Dacă nu există argumente (variabila argc este egală cu ), le punem pe fiecare poziție TABINC Dacă sunt prezente argumente, setați tabulatori așa cum este specificat de utilizator Programul entab este similar cu Exercițiul Funcția tappos determină dacă o anumită poziție este o oprire de tabulare Funcția returnează YES dacă pos este mai mare decât MAXLINE, în caz contrar, tastați [pos ] ♦include ♦definiți MAXLINE /* dimensiunea maximă a liniei */ ♦definiți TABINC /♦ incrementul implicit al filei */ ♦define YES ♦define NO void settab(int argc, char *argv[], char *tab); void detab(char*tab); int tappos(int pos, char *tab); /* înlocuiți file cu spații */ mata (int argc, char *argv(]) { tablă[MAXUNE+ ]; settab(argc, argv, tab); /• set tab stops ♦/ detab (tab); /* înlocuiți file cu spații •/ retumO; } /* detab: înlocuiți file cu spații ♦/ void detab (char *tab) { int c, pos-l; while ((c-getchar O) Î-EOF) { if (c - - '\f) { /♦ caracter tabulator ♦/ do putchar(*'); while (tabpoe(pos++, tab)!-YES); } else if (c "" '\n') { /• caracter de linie nouă ♦/ putchar (c); pos-l; } else { /* toate celelalte caractere */ putchar(c); ++poz; } } } Această soluție se bazează pe programul detab din cartea lui Kernighan și Plodger, Software Tools (Addison-Wesley, ) Funcțiile tappos și settab sunt aceleași ca în prima parte a acestui exercițiu Programul detab este similar cu Exercițiul Exercițiul (pag CG) Extindeți entab și detab pentru a accepta prescurtarea entab -m+n adică plasarea unui opritor la fiecare n coloane, începând cu coloana w Alegeți un comportament implicit convenabil (pentru utilizator) "include "definiți MAXLINE /* dimensiunea maximă a liniei ♦/ "definiți TABINC /* increment implicit al filei */ "definiți DA "definiți NU void esettab(int argc, char *argv[], char *tab); void entab(char*tab); /* înlocuiește șiruri de spații cu tab-uri */ mata (int argc, char *argv[]) { tablă[MAXUNE+ ]; esettab(argc, argv, tab); /• setează tabulaturi */ entab(tab); /• înlocuiți spațiile cu tab-uri •/ retum ; } Fișierul sursă esettab c: "include "definiți MAXLINE /* dimensiunea maximă a liniei */ "definiți TABINC /* incrementul implicit al filei */ "definiți DA "definiți NU O /♦ esettab: setați file în fila matrice ♦/ void esettabdnt argc, char *argv[] • char *tab) { int I, inc, șanț; dacă (argc ) { /♦ treceți prin lista de argumente ♦/ ditch-aloi (*++argv); dacă (șanț > && șanț ♦definiți MAXLINE /♦ dimensiunea maximă a liniei */• ♦definiți TABINC /* pas implicit de creștere a filei */ ♦definiți DA ♦definiți N void esettabGnt argc, char *argv[], char *tab); void detab(char*tab); /* înlocuiți tabulatorii cu spații */ " main(int argc, char *argv[]) { tablă[MAXUNE+ ]; esettab(argc, argv, tab); /* set tab stops */ detab (tab); /♦ înlocuiți tabulatorii cu spații */ returnează ; } Această soluție se bazează pe programul detab din cartea lui Kernighan și Plodger, Software Tools (Addison-Wesley, ) Soluția este similară cu programul detab din Exercițiul și folosește funcția esettab din prima parte a acestui exercițiu Exercițiul (pag CG) Scrieți un program de coadă care imprimă ultimele n linii de intrare În mod implicit, n este, să zicem, , dar poate fi schimbat cu un argument opțional, astfel încât coada -n imprimă ultimele n linii Programul ar trebui să se comporte rezonabil, indiferent cât de nerezonabilă este intrarea sau valoarea lui n Scrieți programul în așa fel încât să folosească cât mai bine memoria disponibilă Șirurile ar trebui să fie stocate ca în programul de sortare din CG , și nu într-o matrice bidimensională de dimensiune fixă ♦include ♦include ♦include ♦define DEFUNES /* numărul implicit de linii de imprimat ♦/ ♦define UNES /* numărul maxim de linii de tipărit */ ♦define MAXLEN /* lungime maximă a liniei de intrare ♦/ • void error (char*); int getline(char *, int); /♦ imprimă ultimele n linii de intrare */ și în (int argc, char *argv[]) { char*p; char*buf; /* pointer către buffer mare */ char *bufend; /* sfârșitul tamponului ♦/ charline[MAXLEN]; /* linia de intrare curentă */ char *lineptr[UNES]; /* pointeri către linii citite ♦/ int primul, i, ultimul, len, n, nlinii; dacă (argc - - ) /♦ fără argumente ♦/ n - DEFUNES; /* alege numărul implicit de rânduri */ elseif (argc && (*++argv)[ ] '-*) n-atoi(argv[ ]+l); altfel reggogCcall: coada [-n]"); dacă (n LINII) /♦ valoare greșită pentru n? */n-LINII; pentru (i - ; i ) { if (p + len + >-bufend) p-buf; /* buffer wrapped */ lineptr [last] -p; strcpy(lineptr[last], line); dacă (-H ast>-LINII) ultimul-O; /• indicatorii buffer se înfășoară în jurul */ p -len + l; nlinest-H; } dacă (n > nlinii) /* trebuie să scoată mai multe linii decât cele citite? ♦/ n - nlinii; primul-ultimul - n; dacă (primul ) primește o linie per apel până când getline (Exercițiul ) găsește sfârșitul intrării Pentru fiecare linie citită, programul folosește spațiul din bufferul alocat Operator if (p + len + >-bufend) p-buf; resetează indicatorul p la începutul buffer-ului atunci când nu există suficient spațiu pentru a copia linia curentă Elementele matricei lineptr sunt pointeri de caractere și indică ultimele LINII ale liniilor citite până acum Indicele pentru această matrice este ultima variabilă Când ultimul devine LINES, este setat la , iar elementele lineptr și buffer-urile lor sunt folosite din nou Numărul total de linii este nlinii Programul tipărește ultimele n linii, astfel încât numărul de linii solicitate nu poate depăși numărul primit: if (n > nlinii) n-nlinii; Dacă numărul total de linii depășește LINES, ultimul indice este setat la și indicele de început trebuie ajustat: dacă (fint ♦include ♦definiți NUMERIC /* sortați numere */ ♦definiți DECR /* sortați în ordine descrescătoare */ ♦define UNES /♦ numărul maxim de rânduri de sortat */ int numcmp(char *, char *); int readlines(char ♦lineptrf], int maxlines); void qsort(char *v[], int stânga, int dreapta, int (*comp) (void ♦, void ♦)); void writelines(char *lineptr [] , int nlines, int decr); opțiunea caracter static - ; /♦ sortare linii de intrare */ main(int argc, char *argv[]) { char *lineptr[UNES]; /♦ pointeri către linii de text ♦/ int nlinii; /* numărul de linii de intrare citite */ int c, gs- ; while (-argc > && (*++argv) [ ] while (cu " *++argv[ ]) comutați (c) { case 'n': /* sort numere */ opțiunea I-NUMERIC ;pauză; case 'r*: /* sortează în ordine descrescătoare ♦/ opţiunea l-DECR; pauză; printf implicit ("sortați cheia nevalidă %c\n", c); argc- ; rc-l; pauză; } if (argc) printf ("Apel: sort -nr\n"); altfel if ((nlines - readlines (lineptr, UNES)) > ) { if (option & NUMERIC) qsort((void **) lineptr, , nlines- , (int (*) (void *, void *)) numcmp); altfel qsort((void *•) lineptr, , nlines- , (int (•) (void ♦, void •)) strcmp); writelinesdineptr, nlines, option & DECR); }altfel{ printf ("Prea multe informații\n">; GS ; } retum rc; } /♦ writelines: printeaza linii de rezultat ♦/ void writelines (char *lineptr[], int nlines, int decr) { int i; if (decr) /♦ print in ordine descrescatoare */ pentru (i nlines- ; i >" ; i-) printf("%s\n", lineptr[i]); else pentru (i - ; i ♦include ♦include ♦define NUMERIC /* sortează numere */ ♦definiți sortarea DECR în ordine descrescătoare */ ♦define FOLD /* combina litere mari și mici */ ♦define LINES /* numărul maxim de linii de sortat */ int charcmp(char ♦, char *); int numcmp(char ♦, char ♦); int readlines(char *lineptr[], int maxlines); void qsort(char *v[], int stânga, int dreapta, int (*comp) (void ♦, void ♦)); void writelines(char * lineptr [], int nlines, int order); opțiunea caracter static - ; /* sortează liniile de intrare ♦/ main (int argc, char *argv []) char *lineptr[LINII]; /* pointeri către linii de text */ int nlinii; /* numărul de linii de intrare citite ♦/ int s, gs- ; while (-argc > && (*++argv) [ ] - - *-') while (c - *++argv[ ]) switch (c) { case 'f : /* amestecă litere mari şi mici */ opțiunea l-FOLD; pauză; case 'n': /♦ sort numere */ opțiunea I-NUMERIC; pauză; case *r': /* sortează în ordine descrescătoare ♦/ opțiunea l-DECR; pauză; Mod implicit: printf ("sortare: cheie nevalidă %c\n", c); argc- ; rc-l; pauză; } dacă (argc) printf("Apel: sortare -fnr\n"); altfel{ if ((nlines-readlines(lineptr, UNES" > ) { if (option & NUMERIC) qsort((void **) lineptr, , nlines- , (int (*) (void *, void *)) numcmp); eiaeif toptan A FOLD) qaort((void **) lineptr, , nitoee- , (lat(*) (void*,void*))charcmp); etoe qaort((void **) lineptr, , nlinea-l, dat (*) (void*,void*))atrcmp); writeiiaeadineptr, nlines, optau & DECR); }ebe{ printf("Prea multe informatiiXn"); re-l; } retum re; } /* charcmp: returnează if s>t */ intcharcmptohar *in, char *t) { for (; tototrerffa) - tolower(*t); Ht-, t++) if(*s-'\ ') return ; retum tolower(*s) - Mower(*t); } Exercițiul este luat ca bază pentru această soluție Al -lea bit - - fără suprapunere, - - sch#mesh enya& (-f) Dacă utilizatorul specifică o cheie de suprapunere, al -lea bit din variabila opțiune trebuie setat la : optau I-FOID; Constanta FOLD (zecimală ) este în notație binară (biții sunt numerotați , , , " de la dreapta la stânga) Funcția charcmp compară șirurile de caractere cu strcmp (pagina ) Convertește literele în minuscule pentru a sprijini potrivirea și le compară Funcțiile pspstr, swap, qsort, readlines și writelines sunt aceleași cu cele utilizate în Exercițiul D Exercițiul (pag CG) Adăugați opțiunea -d (ordine alfabetică), care compară doar litere, cifre și spații Asigurați-vă că comutatorul funcționează în combinație cu -f "include "include "definiți NUMERIC /* sortați numerele •/ "definiți DECR /* sortați în ordine descrescătoare */ "definiți FOLD /* combinați litere mari și mici */" "definiți DIR S /* ordinea alfabetică */ ■ "definiți UNES /* numărul maxim de rânduri de sortat ?/ intcharcmpfchar *, char *); int nuaranpfchar •, char *); int readlines(char *lineptr [], int maxlines); void qsortCchar *v(L int stânga, Int dreapta, int (*comp)(void •, void *)); void writelines(diar*Bneptr[], int nlines, intorder); opțiunea caracter static - ; /♦ sortare linii de intrare •/ maindnt argc, char *argv[]) char ^lineptr [UNES]; /* pointeri către linii de text •/ int nlinii; /• numărul de linii de intrare citite •/ int c, r- ; while ( argc > && (*++argv) [ ] '-') while (c-H+argvIO]) switch (c) { case 'd': /* ordine alfabetică •/ opţiunea l - DIR; pauză; case T: /♦ combina litere mari și mici */ opțiunea l-FOLD; pauză; cazul V: /• sortare numere •/ opțiunea I-NUMERIC; pauză; case 'r*: /* sortează în ordine descrescătoare */ opţiunea l-DECR; pauză; printf implicit ("sortați cheia nevalidă %c\n", c); argc- ; GS- ; pauză; } if (argc) printf ("Apel: sort -dfnr\n"); else{ if ((nlines-readlines (lineptr, UNES)) > ) { if (opțiune și NUMERIC) qsort((void *♦) lineptr, , nlines- , (int (*) (void *, void • )) numcmp); else qsort((void •*) lineptr, , nlines- , (int (•) (void *, void *)) charcmp); writelinesdineptr, nlines, option & DECR); }ebe{ printf("Prea multe informații"); GS- ; } } return rc; } /* charcmp: returnează valoarea dacă s>t */ int charcmp (char *s, char *t) { char a, b; intfold-(opțiune&FOLD) ? : ; intdir-(opțiune&DIR) ? : ; do{ if (dir){ while (!isalnum(*s) && *s - " && *"!- '\ '> ' while (!lsainum(*t) && *t!- " && *t!- '\ ')t++; } a - ori? mai jos(*s): *s; b-fold? jos(*t):*t, dacă (â- b&&a - '\ '> returnează ; } în timp ce (a - b); întoarcere a-b; } Această soluție se bazează pe exercițiile și Al treilea bit ■ este metoda obișnuită de comparare, - - numai ordine alfabetică (-d) Dacă utilizatorul solicită doar ordine alfabetică, al treilea bit din variabila opțiune este setat la opțiunea I-DIR; Constanta DIR (zecimală ) este în notație binară (biții sunt numerotați , , , , de la dreapta la stânga) Funcția charcmp (Exercițiul ) a fost modificată pentru a gestiona cheile de alias și de ordine alfabetică Dacă utilizatorul solicită ordinea alfabetică, bucla while în timp ce (!isalnum(*s) && *s!- " && "s!~ '\ ') s++; examinează fiecare caracter din șirul s și omite caracterele care nu sunt litere, cifre sau spații Macrocomanda isalnum se găsește în fișierul antet ctype h Verifică caracterele alfabetice (a-z, A-Z) și numerele ( - ) Dacă *s este un caracter alfabetic sau o cifră, atunci isalnum nu este , în caz contrar isalnum(*s) este Următoarea buclă while în timp ce (!isalnum(*t) && *t!- " && *t!- '\ ') H+; examinează fiecare caracter din șirul t și omite caracterele care nu sunt litere, cifre sau spații Dacă o literă, cifră sau spațiu se găsește în șirul s și în t găsiți și o literă, un număr sau un spațiu, funcția charcmp compară două caractere Am putea adopta o abordare diferită și apoi să creăm trei funcții în loc de charcmp: foldcmp, dircmp și folddircmp Funcția foldcmp ar combina și compara caractere precum charcmp din Exercițiul Funcția dircmp ar compara caracterele alfabetic, în timp ce folddircmp ar combina și compara alfabetic Fiecare funcție ar fi mai rapidă decât charcmp disponibil Am preferat să facem charcmp mai complex decât să creăm mai multe caracteristici Funcțiile numcmp, swap, qsort, readlines și writelines sunt aceleași cu cele utilizate în Exercițiul Exercițiul (p CG) Adăugați capacitatea de a gestiona câmpuri, astfel încât să puteți sorta după câmpuri care sunt în rânduri, fiecare câmp sortat după un set independent de chei (Indexul acestei cărți a fost sortat cu -df pentru intrările de index și -p pentru numerele de pagină ) ♦include ♦include ♦definiți NUMERIC /* sortați numere ♦/ ♦definiți DECR /• sortați în ordine descrescătoare */ ♦definiți FOLD /♦ combinați litere mari și mici ♦/ ♦definiți DIR /* ordinea alfabetică */ ♦define LINES /* numărul maxim de linii de sortat */ int charcmp (char •, char *); void error(char •); int numcmp(char*, char*); void readargsdnt argc, char *argv[]); int readlines(char *lineptr[], int maxlines); void qsort(char Ml"int stânga, int dreapta, int (*comp) (void ♦, void •)); void writelines(char •lineptr [], int nlines, int decr); opțiunea char- ; int posl " ; /• câmpul începe la poziția posl •/ int pos - ; /• și se termină exact înainte de pos •/ /• sortează liniile de intrare •/ main (int argc, char ♦argv[]) { char *lineptr[LINII]; /• pointeri către linii de text •/ int nlinii; /• numărul de linii de intrare citite •/ int s, gs- ; rea dargs(argc, argv); if ((nlines-readlines (lineptr, LINES)) > ) { if (opțiune și NUMERIC) qsort((void **) lineptr, O, nlines- , (int (♦) (void ♦, void ♦)) numcmp) ; altfel qsort((void **) lineptr, , nlines- , (int (♦) (void ♦, void *)) charcmp); writelines(lineptr, nlines, option & DECR); }altfel{ printf("Prea multe informatii\n"); GS- ; } retum rc; } /* readargs: citiți argumentele programului */ void readargs (int argc, char *argv[]) { intc; int atoi(char*); în timp ce (-argc> && (c- (*++argv) [ ]) c '+') { dacă (c - && !isdigit(*(argv[O]+l))) while (c - *++argv[ ]) switch (c) { case 'd': /* ordine alfabetică */ , opțiunea l-DIR; pauză; case 'f: /* amestecă litere mari şi mici ♦/ opţiunea l-FOLD; pauză; case 'n': /* sortare numere */ opțiunea I-NUMERIC; pauză; case *r\ /* sortează în ordine descrescătoare ♦/ opțiunea l-DECR; pauză; Mod implicit: printf ("sortare: cheie nevalidă %c\n", c); eroare("Apel: sortare -dnfr [+posl] [-pos ]"); break; } altfel dacă (c '-') pos - atoi(argv[ ]+l); elseif ((posl -atoi(argv[ ]+l)) pos ) eroare("Apel: sort -dnfr [+posl] [-pos ]"); } Fișierul sursă numcmp c: ♦include ♦include ♦include ♦definiți MAXSTR void substr(char *s, char *t, int maxstr); /♦ numcmp: comparați șirurile sl și s ca numere */ int numcmp(char*sl, char*s ) { dublu vl, v ; charstr[MAXSTR]; substr(sl, str, MAXSTR); vl-atof(str); substr(s , str, MAXSTR); v -atof(str); dacă (vl v ) retur ; altfel întoarce ; } #define FOLD /* combina literele mari și mici */ #define DIR /* ordinea alfabetică */ /* charcmp: returnează valoarea dacă s>t */ int charcmp (char *s, char *t) { char a, b; int i, j, endpos; opțiunea externchar; extern int posl, pos ; int fold - (opțiune și FOLD) ? : ; int dir- (opțiune &DIR) ? : ; ij-posl; if (pos > ) endpos - pos ; elseif ((endpos-strlen(s)) >strlen(t)) endpos - strlen(t); do{ if (dir) { while (i E+; } dacă (i void error(char*); /* substr: obțineți și scrieți în str un subșir din șir s */ void substr(char *s, char *str) { int i, j, len; extern int posl, pos ; len-strien(e); dacă (poz > && len > pos ) len - pos ; else if (pos > && len #include #include enum { NUME, PĂRINȚI, PARAnteZELE }; enumerare {NU, DA}; void dcl(void); void dirdci(void); void errmsg(char*); int gettoken(void); extern int tokentype; /* tipul ultimului jeton ♦/ extern char token[]; /* șir care conține ultimul simbol */ extern char name (]; /* identificator ♦/ extern char out[]; extern int prevtoken; /* dcl: analizează declaratorul */ void dcl (void) ( intns; pentru (ns - ; gettoken() ) /♦ numără stele ♦/ nsH-; dirdcl ; while (ns -M" strcat (out, "point, to"); } /* dirdcl: analizează declaratorul imediat */ void dirdcl(void) { inttype; if (tok&ntype -"'('){/*( dcl) ♦/ dclO; if (tokentype!- ')') ergsubError: lipsă )\n"); } else if (tip token - - NUME) /♦ nume variabilă */ strcpy (nume, simbol); altfel errmsg("Eroare: numele așteptat sau (dcl)\n"); while ((type-gettoken O) PARENS type BRACKETS) if (type - PARENS) Strcat(out," function return**); else{ strcat(out, "array"); strcat(out, token); strcat(out, "out**); } } /• emnsg: tipăriți un mesaj de eroare și specificați dacă ♦/ /* că jetonul este disponibil */ void emnsg(char *msg) { printf (-%•-, mag); prevtoken-DA; } Fișier sursă gettoken c: #indude ♦include enum { NUME, PĂRINȚI, PARAnteZELE }; enumerare {NU, DA}; extern int tokentype; /* tipul ultimului jeton */ extern char token[]; /♦ șir care conține ultimul token */ int prevtoken - NU; /* nici un simbol anterior */ /* gettoken: returnează următorul token */ int gettoken(void) { int c, getch(void); void ungetch(int); char *p - token; if (prevtoken-YES) { prevtoken "NU; retum tokentype; } în timp ce ((c getchO) ' ' c '\f); dacă (c -'('){ if ((c-getch ()) - ')'){ strcpy (token, "()**); retum tokentype - PARENS; }else{ ungetch(c); retum tokentype - * ('; } }elseif (c '[') { pentru (*p++-c; (♦pt-b-getchO)!- ']*;) ♦p-'\ '; retum tokentype - BRACKETS; } else if (isalpha(c)) { pentru (*p++ -c; isalnum (c-getch O);) • pH - s; ♦p-'\ '; ungetch(c); returnează tokentype-NAME; }altfel return tokentype - c; } Am schimbat puțin dirdcl, deoarece această funcție așteaptă unul dintre cele două simboluri: ') ' după un apel dd sau un nume Dacă jetonul întâlnit nu este niciunul, numim errmsg în loc de printf Funcția errmsg emite un mesaj de eroare și setează variabila prevtoken pentru a indica lui gettoken că simbolul există deja Există o nouă instrucțiune if la începutul funcției gettoken: if (prevtoken-YES) { prevtoken-NU; return tokentype; } Adică, dacă tokenul există deja, nu accepta încă unul nou Noua noastră versiune nu este antiglonț, dar gestionarea erorilor a fost îmbunătățită Exercițiul (pag CG) Modificați funcția undd astfel încât să nu adauge paranteze suplimentare în declarație ♦include ♦include ♦include ♦definiți MAXTOKEN enum { NUME, PĂRINȚI, PARAnteZELE }; void dcl(void); void dirdcl(void); int gettoken(void); int nexttoken(void); int tokentype; /• tipul ultimului token •/ chartoken [MAXTOKEN]; /♦ șir care conține ultimul token*/ char out [ ]; l* t"ndcl: convertiți descrierea verbală în declarație •/ mainO { inttype; KN char temp[MAXTOKEN]; while (gettoken() !-EOF) { strcpyCout, token); while ((type - gettoken())!- '\n*) if (type - PARENS type - BRACKETS) strcat(out token); else if (type -'♦'){ if ((type-nexttoken ) - PARENS type - BRACKETS) sprintf(temp, "(*%s)", out); altfel sprintfttemp, out); strcpy(out, temp); } else if (tip-NUME){ sprintf(temp, "%s %s", token, out); sifpy(cut, temp); }else printf ("Eroare de intrare: %s\n", simbol); printf("%s\n", out); } întoarce ; } enumerare {NU, DA}; int gettoken(void); /* nexttoken: obține următorul token și returnează-l ♦/ int nexttoken (void) { inttype; extern int prevtoken; tip-gettoken(); prevtoken-DA; tip retur; } Pentru a obține descrierea "x: pointer to char" a funcției dcl, introduceți x ♦ car iar funcţia undei dă ♦car(*x) Parantezele sunt redundante De fapt, parantezele sunt necesare numai atunci când următorul simbol este O sau [ ] Pentru exemplul "daytab: pointer to an array [ ] of int" al funcției dcl, introduceți daytab* [ ] int iar funcţia undei dă int (*daytab) [ ] si este corect Pe de altă parte, pentru exemplu, se introduce "daytab: array [ ] pointer to int" daytab [ ] *int iar funcţia undei produce int(*daytab[ ]> În acest caz, parantezele sunt redundante Am schimbat funcția undei pentru a verifica dacă următorul token este O sau [ ] Dacă este, parantezele sunt obligatorii, altfel sunt redundante Înainte de a decide să adăugăm paranteze, ne uităm la expresia cu un jeton înainte Am creat o funcție simplă nexttoken care apelează gettoken , surprinde faptul că jetonul este deja disponibil și returnează tipul jetonului Funcția gettoken (din Exercițiul ) verifică dacă jetonul este disponibil înainte de a obține un nou jeton de la intrare Undei modificat nu produce paranteze suplimentare De exemplu, pentru a intra x ♦ car rezultatul va fi char*x Pentru Exprimare daytab * [ ] int emis int (*daytab) [ ] si pentru daytab[ ]*int emis int *daytab[ ] Exercițiul (pag CG) Extindeți funcția del pentru a gestiona declarațiile cu tipuri de argumente ale funcției, declaratori precum const și așa mai departe ♦include ♦include ♦include enum { NUME, PĂRINȚI, PARAnteZELE }; enumerare {NU, DA}; void dcl(void); void dirdcl(void); void errmsg(char*); int gettoken(void); extern int tokentype; /♦ ultimul tip de simbol */ extern char token []; /* șir care conține ultimul simbol ♦/ extern char name []; /♦ identificator */ tip de date externchar[]; /• tip de date - int, char, etc ♦/ extern char out []; ' ' extern int prevtoken; /* dcl: analizează declaratorul */ void dcl (void) { intns; pentru (ns - ; gettokenO ) /• numără stelele •/ ns++; dirdcl ; while (ns - ) strcat(out, "point, to"); } /♦ dirdcl: parse declarator imediat */ void dirdcl (void) { inttype; void parmdcKvoid); if (tokentype - '('){/♦( dcl) ♦/ dclO; if (tokentype!- ')') errmsg ("Eroare: lipsește )\n"); } else if (tip token - - NUME) { /* nume variabilă ♦/ if (nume[ ] A *) strcpy (nume, simbol); }else prevtoken-DA; while ((type-gettokenO) -PARENS type - BRACKETS type '(') if (type - PARENS) strcat(out," func return "); elseif (type 'C) { strcat(out," func accept "); pa nn dcl O; strcat(out, "și return "); }else{ strcat(out, "array"); strcat(out, token); strcat(out, "din"); } } /• errmsg: tipăriți mesajul de eroare și specificați dacă •/ /* că jetonul este disponibil */ void errmsg (char *msg) { printf ("%s", msg); prevtoken-DA; } Fișierul sursă Parmdcl c: ♦include ♦include ♦include ♦include ♦definiți MAXTOKEN enum { NUME, PĂRINȚI, PARAnteZELE }; enumerare {NU, DA}; void dcl(void); void errmsg(char ♦); void dclspec(vold); inttypespec(void); int typequal(void); int compara(char ♦♦, char ♦♦); int gettoken(void); extern int tokentype; /* tipul ultimului token */ extern char token []; /* șir care conține ultimul token */ extern char name[]; /* identificator ♦/ externchar datatypef]; /* tip de date - int, char, etc */ extern char out[]; extern int prevtoken; /* parmdcl: analizați declaratorul cu parametrii */ void parmdcl (void) { do{ dclspecO; } while (tip token *,'); if (tokentype!- ')*) errmsgCOrcyTCTByeT) în declaraţia parametrului xn"); } /• dclspec: specificația declarației */ void dclspec (void) { char temp[MAXTOKEN]; temp[ ] -'\ '; gettoken(); do{ if (tokentype!-NAME) { prevtoken-YES; dclO; } else if (typespecO - YES) { strcat(temp, " "); strcat(temp, token); gettoken O; } else if (typequalO -YES) { strcat (temp, " "); strcat(temp, token); gettokenO; }else errmsg ("Tip necunoscut în lista de parametri\n"); } while (tip de simbol!- *,* && tip de simbol!- *)'); strcat(out, temp); dacă (tip token ',*) strcat(out, ","); } /* typespec: returnează DA dacă simbolul dat este */ /* specificator de tip */ int typespec(void) caracter static *tipuri[) - { "char", "int", "gol" }; char *pt - token; if (teearch(&pt, types, sizeof (tipuri)/sizeof (car *), sizeof (car *), compara) - - NULL) retum NU; altfel retur DA; } /* typequal: returnează DA dacă simbolul dat este */ /* descriptor de tip */ int typequal (void) caracter static ♦typeqf] - { "const", "volatil" }; char *pt-token; if (teearch(&pt, typeq, sizeof (typeq)/sizeof (char *), sizeof (char ♦), compara) - - NULL) retum NU; altfel retur DA; } /* compara: compară două șiruri pentru bsearch ♦/ int compare(char **s, char **t) retumstrcmp(*s, *t); } Am extins gramatica de pe CG p pentru a include declarații de parametri: dcl: opțional) * direct-dd direct-dcl: nume (dcl) direct-dcl (opțional parm-dcl) direct-dcl [dimensiune opțională] parm-dcl: dcl-spec: parm-dcl, dcl-spec dcl type-spec dcl-spec type-qual dcl-spec Aceasta este o versiune prescurtată a părții din gramatică care descrie declarațiile Sunt recunoscuți mai mulți specificatori de tip, descriși în CG p De exemplu, declarația void •(♦comp) (int ♦, char ♦, int (*fnc)()) are rezultatul comp: decret, a func in asteptarea pointer, la int, pointer, la char, pointer, la func întoarcere int și return decret, privind nulitatea Am schimbat funcția dirdcl și am adăugat funcțiile parmdcl și dclspec Acest exercițiu folosește lead-ul creat în Exercițiul Uneori trebuie să extragi un token înainte de a decide ce să faci Dacă există un jeton care nu poate fi folosit încă, îl returnăm înapoi Următorul apel la gettoken oriunde în parser va prelua din nou același simbol și îl va folosi Funcția bsearch este din biblioteca standard și efectuează o căutare binară Capitolul structurilor Exercițiul (pag CG) • Versiunea noastră a funcției getword nu gestionează în mod corespunzător literele de subliniere, constantele șirurilor, comentariile și liniile de control ale preprocesorului Scrie cea mai bună versiune ♦include ♦include /* getword: obține următorul cuvânt sau caracter de la intrare */ int getword (char *word, int lim) { intc, d, comment(void), getch(void); void ungetch(int); char*w-word; în timp ce (isspace(c-get())) dacă (c О-EOF) M+-t; if (isalpha(c) c - " c - *♦') { for (; lim > ; vrH-) if (!isalnum(*w-getch ()) && *w!- 'J) { ungetch (*w); " pauză; } }elseif (c '\" c '"') { for (; lim > ; w++) if ((♦w-getchO) - 'W) ♦++w- getch ; elseif ( *w c) { pauză; } elseif Cw-EOF) break; }else if (c '/') if ((d-getch()) - '♦') C"comment(); altfel ungetch(d); *w-*\ '; retum c; } /* comentariu: omite comentariul și returnează caracterul */ int comentariu (void) { int c; în timp ce ((c-getO) Î-EOF) dacă (c - '•') if ((c-get()) - '/') break; altfel ungetch(c); retum c; ) Pentru a gestiona liniuțele de subliniere și comenzile de preprocesor, ne-am schimbat daca (!isalplia(c)) pe dacă (isalpha(c) s - 'J s - '♦') Caracterele alfanumerice și caracterele de subliniere ulterioare sunt tratate ca parte a cuvântului Constantele șirurilor pot apărea în interiorul ghilimelelor simple sau duble Când găsim un citat, luăm caractere până când se întâlnește un citat de închidere sau EOP Ignorăm comentariile și returnăm caracterul bară oblică de închidere Această parte a programului este similară cu Exercițiul Exercițiul (SL CR) Scrieți un program care citește un program C și imprimă în ordine alfabetică fiecare grup de nume de variabile care se potrivesc în primele caractere, dar diferă în altă parte Nu luați în considerare cuvintele din șirurile de caractere și comentarii Faceți din numărul un parametru care poate fi dat din linia de comandă ♦include ♦include ♦include ♦include struct tnode { /♦ nod arborescent: ♦/ char *cuvânt; /♦ pointer la text ♦/ int potrivire; /♦ match flag ♦/ struct tnode •left; /♦ copil stâng ♦/ struct tnode ♦ dreapta; /♦ copil drept ♦/ }; ♦definiți MAXWORD ♦definiți DA ♦definiți NO struct tnode *addtreex(struct tnode ♦, char ♦, int, int ♦); void treexprint (struct tnode *); int getword(char ♦, int); /* tipăriți în ordine alfabetică fiecare grup de nume de variabile care */ /* se potrivesc în primul număr de caractere */ mainfint argc, char *argv[]) { struct tnode *rădăcină; cuvânt [MAXWORD]; int găsit - NU; /* DA dacă a fost găsită o potrivire */ int num; /♦ numărul primelor caractere de comparat */ num - (-argc && (*++argv) [ ] ?atoi(argv[ ]+l): ; root-NULL; while (getword (cuvânt, MAXWORD) !-EOF) { if (isalpha (cuvânt[ ]) && strlen (cuvânt) >- num) root- addtreex (rădăcină, cuvânt, num, Afound); găsit-NU; } treexprint(rădăcină); întoarce ; } struct tnode *talloc(void); int compare(char *, struct tnode *, int, int *); /* addtreex: adăugați un nod cu cuvântul w la indicatorul p sau mai jos */ struct tnode *addtreex (struct tnode *p, char *w, int num, int *găsit) { intcond; if (p NULL) { /* a apărut cuvânt nou */ p - tallocO; /* creează un nou nod */ p->word - strdup(w); p->potrivire - *găsit; p->stânga - p->dreapta - NULL; } else if ((cond - compare(w, p, num, found)) left - addtreex (p->left, w, num, found); else if (cond > ) p->right - addtreex (p->right, w, num, found); retum p; } /♦ compara: compară cuvinte și actualizează p->match ♦/ int compară (char *s, struct tnode *p, int num, int *found) { int i; char *t -p->cuvânt; pentru (i - ; *s - *t; H+, s++, t++) dacă Cs - "\ ") întoarce ; dacă (i >- num) { /♦ se potrivește în primul număr de caractere? ♦/ ♦găsit-DA; p->potrivire-DA; } retum *s - *t; } /• treexprint: imprimă treexprint în ordine dacă p->match YES ♦/ void treexprint (struct tnode *p) { if (p !-NULL){ treexprint (p->stânga); if (p->match) printf("%s\n", p->cuvânt); treexprint(p->dreapta); } } Programul imprimă nume de variabile care se potrivesc cu primul număr de caractere Dacă numărul de caractere nu este specificat din linia de comandă, acesta este setat la num - (-argc && (*++argv) [ ] *-*) ? atoi(argv[ ] ): ; Variabila găsită este booleană, găsită este DA dacă cuvântul se potrivește în număr de caractere cu un cuvânt din arbore, în caz contrar NU Programul plasează un cuvânt în arbore dacă primul caracter al cuvântului este alfabetic și lungimea cuvântului este mai mare sau egală cu num getword este funcția din exercițiul Funcția addtreex, care este o modificare a addtree (p ), inserează un cuvânt într-un arbore Funcția de comparare compară un cuvânt inserat în arbore cu un cuvânt deja acolo Dacă există o potrivire în primele num de caractere, *found și elementul care reflectă potrivirea (p->match) corespunzător cuvântului din arbore sunt setate la YES dacă (i > - num) { ♦găsit-DA; p->potrivire-DA; } Funcția treeprint tipărește cuvintele din arbore care se potrivesc cu cel puțin un alt cuvânt în primul număr de caractere Exercițiul (pag CG) Scrieți un program de referințe încrucișate care tipărește o listă cu toate cuvintele dintr-un document și, pentru fiecare cuvânt, o listă cu numerele de rând pe care le conține w se intalneste Nu luați în considerare cuvinte obișnuite precum "cel", "și", etc ♦include ♦include ♦include ♦include ♦definiți MAXWORD struct linklist { /* linked list of line numbers */ int Inum; struct linklist *ptr; }; struct tnode { /* nod arbore: */ char *cuvânt; /• pointer către text */ struct linklist *linii; /• numere de linii */ struct tnode 'left; /♦ copil stâng ♦/ struct tnode *dreapta; /* copilul drept */ }; struct tnode *addtreex (struct tnode *, char ♦, int); int getword(char *, int); int noiseword(char*); void treexprint (struct tnode *); /* imprimantă de referințe încrucișate */ mainO { struct tnode *rădăcină; cuvânt [MAXWORD]; int linenum - ; root-NULL; în timp ce (getword(cuvânt, MAXWORD) Î-EOF) if (isalpha (cuvânt [ ]) && noiseword (cuvânt) - - - ) rădăcină - addtreex (rădăcină, cuvânt, linenum); else if (cuvânt[ ] - - '\n') linenum-H-; treexprint(rădăcină); întoarce ; } struct tnode *talloc(void); struct linklist *lalloc(void); void addin(struct tnode *, int); /* addtreex: adăugați nod cu cuvântul w la indicatorul p sau mai jos */ struct tnode 'addtreex (struct tnode *p, char *w, int linenum) { intcond; if (p - - NULL) { /• a apărut un cuvânt nou */ p - tallocO; /* creează un nou nod */ p->word - strdup (w); p->linii-lalloc(); p->linii->lnum - linenum; , A p->linii->ptr - NULL; p->stânga - p->dreapta - NULL; } else if ((cond - strcmp(w, p->cuvânt)) - - ) addln (p, linenum); else if (cond left- addtreex (p->left, w, linenum); altfel p->right - addtreex(p->right, w, linenum); retum p; } /* addln: adăugați numărul de linie la sp&y asociat */ void addln (struct tnode *p, int linenum) { struct linklist *temp; temp-p->linii; while (temp->ptr!- NULL && temp->lnum!- linenum) temp - temp->ptr; if (temp->lnum!-linenum) { temp->ptr - lallocO; temp->ptr->lnum linenum; temp->ptr->ptr - NULL; /♦ treexprint: tipăriți arborele p în ordine ♦/ void treexprint(struct tnode *p) { struct linklist *temp; dacă (p!-NULL){ treexprint(p->stânga); printf("% s: \ p->cuvânt); pentru (temp - p->linii; temp!- NULL; temp - temp->ptr) printf("% d temp->lnum); printf("\n"); treexprint(p->dreapta); } } /* lalloc: creează un nod de listă legată */ struct linklist •lalloc(void) { retum (structlinklist *) malloc(sizeof(struct linklist)); } /* noiseword: recunoașteți cuvintele suprautilizate */ int noiseword (char *w) { caracter static *nw[] - {e "A", "un", sunt, "în", * "este", "de", "sau", "acea", "cel", "acest", "către" }; int cond, mid; int scăzut - ; int high - sizeof (nw) / sizeof (char ♦) - ; în timp ce (scăzut ) low-mid + ; altfel reveni la mijloc; } retum- ; } Arborele conține un nod pentru un singur cuvânt Fiecare nod include: pointer către textul cuvântului (cuvântului); un indicator către o listă legată de numere de linii (linii); indicatorul către nodul copil stâng (stânga); indicatorul către nodul copil din dreapta (dreapta) Fiecare element al unei liste legate de numere de linii este o structură de tip listă de linkuri Fiecare structură conține un număr de linie și un indicator către următorul element din lista legată Dacă nu mai există elemente în listă, acest indicator este NULL Funcția addtreex este o versiune modificată a addtree (p CR) Funcția addtreex inserează un cuvânt în arbore și un număr de rând în lista de legătură corespunzătoare Dacă este un cuvânt nou, numărul rândului este atribuit primului element al listei legate: p->linii->lnum - linenum; Dacă cuvântul este deja în arbore ((cond - strcmp(w, p->cuvânt)) - - ) funcția addlen adaugă un număr de rând la lista legată Funcția addlen parcurge lista legată căutând același număr de rând sau NULL: while (temp->ptr!- NULL && temp->lnum!- linenum) temp - temp->ptr; Dacă numărul rândului dat nu este în listă, funcția adaugă numărul la sfârșitul listei legate: if (temp->lnum !-linenum) { temp->ptr - lallocO; temp->ptr->lnum - linenum; temp->ptr->ptr - NULL; } Funcția treexprint este o versiune modificată a treeprint (p CR) Funcția treexprint tipărește arborele în ordine alfabetică Pentru fiecare cuvânt din arbore, funcția tipărește cuvântul în sine și toate numerele de rând în care apare cuvântul Funcția noiseword caută un cuvânt într-o matrice statică de cuvinte suprautilizate Dacă cuvântul nu este unul dintre ele, returnează - Puteți adăuga propriile cuvinte la nw[ ] atâta timp cât matricea rămâne sortată în coduri ASCII crescătoare Am schimbat getword pentru a returna "\n", astfel încât să putem ține evidența numerelor de rând: while (isspace(c - getchO) && c!- *\n*) Exercițiul (CG p ) Scrieți un program care imprimă cuvinte individuale ca intrare, sortate în ordinea descrescătoare a frecvenței de apariție Fiecare cuvânt să fie precedat de contorul său ♦include ♦include ♦definiți MAXWORD ♦definiți NDITINCT struct tnode { /♦ nod arbore: */ char *cuvânt; /♦ pointer la text ♦/ int count; /* de câte ori apare cuvântul */ struct tnode *left; /* copil stânga */ struct tnode *dreapta; /* copilul drept */ }; struct tnode *addtree (struct tnode *, char *); int getword(char *, int); voidsortlist(void);* void treestore (struct tnode ♦); struct tnode *list [NDISTINCT]; /♦ pointeri către nodurile arborelui */ int ntn - ; /• numărul de noduri arborescente •/ /* tipăriți cuvinte sortate în ordinea descrescătoare a frecvenței ♦/ principalO { struct tnode *rădăcină; cuvânt [MAXWORD]; int i; root-NULL; while (getword(cuvânt, MAXWORD) Î-EOF) dacă (isalpha(cuvânt[ ])) rădăcină - addtree(rădăcină, cuvânt); treestore(rădăcină); sortlistO; pentru (i- ;i count, ltet[i]->word); retum ; } /•treestore: scrieți pointeri către nodurile arborelui în list[] array */ void treestore (struct tnode *p) { if (p Î-NULL) { treestore (p->stânga); if (ntn dreapta); } } /• sortlist sort listă de pointeri către nodurile arborescente */ void sortlistO { intap, i, j; struct tnode ♦temp; pentru (gap - ntn/ ; gap > ; gap /- ) for (i - gap; i - ; j-gap) { if ((lista Q ] ->count) >- (list[j+gap]->count)) pauză; temp-list[j]; list[j] -list[J next) { if (strcmp(s, np->nume) ) pauză; prev-np; /* amintiți-vă elementul anterior */ if (np Î-NULL) { /* numele găsit */ if (prev NULL) /* acesta este prenumele din tabelul hash? */ hashtab [h] -np->next; else /* nu, nu primul */ prev^>next-np->fiext, liber((vold •) np->nume); liber((void *) np-Xfefh); liber((void *)np); /* dealocarea structurii alocate } } Funcția undef caută în tabel șirul s, după ce îl găsește, bucla iese: if (strcmp(s, np->nume) ) pauză; Dacă rândul s nu este în tabel, bucla for se termină când pointerul pr devine NULL Dacă pr nu este NULL, atunci există un nume și o definiție de eliminat din tabel Elementul din hashtab indică începutul listei legate, ex indică elementul care trebuie eliminat, iar prev indică pe cel precedent Dacă prev este NULL, atunci prev este primul element al listei legate începând cu hashtab[h]: if (prev-NULL) hashtab [h] -np->next; else prev^->next - np->next, După eliminarea elementului np, spațiul alocat pentru °І numele, definiția și structura în sine, este eliberată (gratuit, p KR) liber((void ♦) np->nume); liber((void ♦) np->defn); liber((void*)np); Exercițiul (p KP) Faceți o versiune simplă a handler-ului #define (adică fără argumente) potrivită pentru lucrul cu programe C și bazată pe programele din această secțiune De asemenea, puteți găsi utile funcțiile getch și ungetch ♦include ♦include ♦include ♦definiți MAXWORD struct nlist { /* element tabel: ♦/ structnlist *next; /* următorul element din lanț */ caracter*nume; /♦ nume de definit */ char *defn; /♦ text de înlocuire */ j" void errordnt, char*); int getch(void); void getdef(void); int getword(char ♦, int); struct nlist *install(char* char*); struct nlist *lookup(char •); void skipblanks(void); void undef(char*); void ungetch(int); void ungete(char*); /* versiune simplă a handlerului #define ♦/ mainO { charw[MAXWORD]; structnlist *p; while (getword (w, MAXWORD) Î-EOF) if (strcmp(w,"#") ) /♦ începutul directivei */ getdef O; altfel dacă (!isalpha(w[ ])) printf ("%s", w); /* nu poate fi definit ♦/ altfel dacă ((p - căutare(w)) - - NULL) printf("%s",w); /♦ nedefinit ♦/ else ungets(p->defn); /* returnează definiția */ returnează ; } /* getdef: obțineți definiția și introduceți-o în tabel ♦/ void getdef (void) { int c, i; char def [MAXWORD] , dir [MAXWORD], nume [MAXWORD]; skipblanksO; dacă (!isalpha(getword(dir, MAXWORD))) eroare(dir[O], "getdef: directivă așteptată după #"); elseif (strcmp(dir, "definire") O) { skipblanksO; dacă (!isalpha(getword(nume, MAXWORD))) eroare(nume[ ], "getdef: nu o literă - numele așteptat"); altfel{ skipblanksO; pentru (i - ; i ♦include ♦include /* minuscul: convertește majuscule în minuscule */ /* sus convertește literele mici în majuscule */ maindnt argc, char *argv[]) { int c; if (strcmp(argv[O], "jos") O)* while ((c-getcharO) Î-EOF) putchar( lower (c)); altfel while ((c - getchar ())!- EOF) putchar (toupper(c)); întoarce ; } Dacă programul este apelat cu numele mai mic, acesta convertește literele mari în minuscule În caz contrar, litere mici la majuscule Funcția strcmp returnează zero când argv[ ] este șirul inferior Operator if (strcmp (argv [ ], "lower") - ) funcționează pe un sistem UNIX deoarece argv [ ] este numele programului așa cum l-a tastat utilizatorul Pe unele sisteme de operare, argv[ ] este calea completă către locația programului, nu ceea ce a introdus utilizatorul Programul folosește funcțiile tolower și topper de la Exercițiul (SL CR) Scrieți un program care imprimă intrări arbitrare într-un mod rezonabil Cel puțin, ar trebui să imprime caractere non-grafice în octal sau hexazecimal (cum este obișnuit pe o anumită mașină) și să taie linii lungi de text ♦include ♦include ♦definiți MAXLINE /* numărul maxim de caractere */ /• pe linie •/ ♦define OCTLEN /* lungimea valorii octale */ /* imprimă intrarea arbitrară într-un mod rezonabil */ principalO { int c, pos; int inc(int pos, int n); poz- ; /♦ poziție în șir */ while ((c-getcharO) Î-EOF) if (iscntrl(c): :c ' ') { /♦ caracter negrafic sau spațiu */ pos - inc (pos OCTLEN); printfC\\% o",c); if (c - - '\n') { /♦ caracter newline ♦/ pos - ; putchar(An'); } else { /* caracter grafic */ pos-inc(poz, ); putchar(c); } întoarce ; } /♦ inc: crește contorul de poziție de ieșire */ int incdnt pos, int n) { if (pos + n iscntrl macro iscntrl Caractere negrafice cu cifre: șterge caracterul ( octal) și caractere de control obișnuite (coduri mai mici de octal) Separatoarele sunt considerate și caractere negrafice Caracterele negrafice sunt tipărite în octal (numărul este precedat de un spațiu și \, numărul este urmat și de un spațiu) folosind pozițiile OCTLEN Caracterul newline resetează variabila pos: dacă (c *\n*){ pos-O; putcharCW); } Funcția inc returnează ultima poziție utilizată și înfășoară linia dacă nu există n spații de caractere disponibile pentru ieșire Exercițiul (pag CG) Modificați funcția minprintf pentru a gestiona mai multe caracteristici ale funcției printf ♦include ♦include ♦include ♦define LOCALFMT /♦ minprintf: mini-printf cu listă de argumente variabile •/ void minprintf (char *fait, ) va listap; /♦ indică fiecare argument nenumit •/ char *p, *sval; char localfmt[LOCALFMT]; inti, ival; uval nesemnat; dublu dval; va start(ap, fmt); /* setează ap la primul argument fără nume */ pentru (p - fmt; *p; p++) { if(*p!-'%'){ putchar(*p); continua; } i- ; localfmt[H+] - *%*; /* start local fermat */ while (*(pH) && !isalpha(*(pH") localfmt [Н+] - *нр; /• selectează caractere ♦/ localfmt[H+] - *(pH); /♦ literă de format ♦/ localfmt [i] - '\ '; comutare (*++p) { /♦ format letter ♦/ case'd*: caseT: ival - va arg(ap, int); printf(localfmt, ival); pauză; caz 'x': cazul *X*: case'u': case'o': uval - va arg(ap, unsigned); printf(localfmt, uval); pauză; cazul f: dval - va arg(ap, double); printf(localfmt,dval); pauză; caz': sval - va arg(ap, char •); printf(localfmt, sval); pauză; } } va end(ap); /• finalizarea •/ } Funcția minprintf iterează prin lista de argumente, iar printf imprimă funcțiile acceptate Pentru a gestiona mai multe caracteristici ale funcției printf, colectăm caracterul % și orice alte caractere până la alfabet - literele de format din matricea localfmt Șirul localfmt este argumentul de format pentru printf Exercițiul (SL CR) Scrieți propria versiune de scanf, similară cu minprintf din secțiunea anterioară ♦include ♦include ♦include ♦definiți LOCALFMT /* minscanf: mini-scanf cu listă de argumente variabile */ void minscanf (char *fmt, ) va listap; /* indică fiecare argument nenumit ♦/ char *p, * va ; char localfmt[LOCALFMT]; int c, i, *val; nesemnat *uval; dublu *dval; i - ; /♦ index pentru matrice localfmt ♦/ va start(ap, fmt); /♦ setați ap la primul argument fără nume*/ pentru (p - fmt; *p; p++) { if(*p !"'%*){ localfmt[H+] - *p; /• selectați caractere */ continua; } ' localfmt[H+] - /* format de pornire ♦/ în timp ce (*(p+l) && !isalpha(*(p+l))) localfmtfrH-] - *++p; /• selectează caractere ♦/ localfmt[Hb] - *(p+l); /♦ format litera ♦/ localfmt[i]-'\ '; switch(*++p) { /♦ format litera */ case'd': case'i': ival - va arg(ap, int ♦); scanfdocalfmt, ival); pauză; case 'x': case'X*: case *u': case'o': uval - va arg(ap, unsigned •); scanfdocalfmt, uval); pauză; cazul f: dval - va arg(ap, double ♦); scanfdocalfmt, dval); pauză; caz': sval - va arg(ap, char*); scanfdocalfmt, sval); pauză; } i - ; /• resetați indexul */ }va end(ap); /* Sfârşit */ } Funcția minscanf este similară cu minprintf Această funcție preia caractere din șirul de format până când găsește caracterul alfabetic după % Acesta va fi localfmt-ul transmis către scanf împreună cu pointerul corespunzător Argumentele pentru scanf sunt pointeri: un pointer către un șir de format și către o variabilă care primește o valoare de la scanf Folosim va arg pentru a obține valoarea pointerului, a o copia într-un pointer local și a apela scanf scanf citește apoi valoarea în variabila utilizator Exercițiul (pag CG) Refaceți calculatorul postfix de la cap folosind scanf și/sau sscanf pentru a introduce și converti numere ♦include ♦include ♦defini NUMĂR * * /♦ semn că a fost găsit un număr •/ /* getop: obține semnul următoarei operații sau operand numeric */ int getop (car s []) { int c, i, rc; caracter static lastc sscanf(lastc, "%c", etc); lastc [ ] -•';/* șterge ultimul caracter ♦/ while ((s[ ] - c) - - " II c '\t') if (scanf ("%c", drc) - EOF ) c-EOF; s[l] -L '; if(!isdigit(c)&&c!-' ') return c; /♦ nu un număr */ i- ; if (estedigit(c)) /• selectează partea întreagă ♦/ do{ rc - scanf("%c", &c); dacă (!isdigit(s[ -H] - c)) rupe; } în timp ce (rc Î-EOF); if (c - - * ') /♦ selectează partea fracționară ♦/ do{ rc - scanf("%c", &c); if (îisdigit(s[++i) - c)) break; } în timp ce (rc Î-EOF); sfiJ-AO'; dacă (rc Î-EOF) lastc[ ] -c; retur NUMĂR; } Funcția getop (c KP) este singura subrutină care a fost schimbată Ceva de reținut între apelurile getop este caracterul care urmează numărului Matricea lastc este o matrice statică cu două elemente care își amintește ultimul caracter citit (funcția sscanf necesită un șir de caractere) Apel sscanf (lastc, "%s", &s) citește caracterul plasat în lastc[ ] ai putea folosi c-lastc[O] în loc să apeleze sscanf Funcția scanf returnează cu succes numărul de sub puncte de intrare introduse și atribuite (p CG) Returnează EOF la sfârșitul fișierului Am schimbat și expresia isdigit(s[++i]-c-getchO) pe rc-scanf("%c", &c); dacă (!isdigit(s[++i] -с)) rupe; deoarece trebuie să apelăm scanf, să adăugăm un caracter la șirul s și apoi să verificăm o cifră Este absolut posibil ca scanf să fi detectat EOF și, prin urmare, să nu fi schimbat c De aceea verificăm starea rc!-EOF Funcția scanf nu ajută la îmbunătățirea getop-ului original dacă citim un caracter per acces cu scanf Iată o altă soluție posibilă: ♦include ♦include ♦define NUMBER * ' /* semn că a fost găsit un număr */ /* getop: obține următorul semn al operației sau al operandului numeric */ int getop (char s[]> { int c, rc; plutitor f; în timp ce ((rc-scanf("%c", &c))!-EOF) dacă ((s[O]-c) !-"&&c!-'\t') se rupe; s[l]-'\ *; if (rc - EOF) returnează EOF; else if (lisdigit(c) && c!-return c; /♦ nu este un număr */ ungetcCc, stdin); scanf("%F, &f); sprintf(s, "%r, f); returnează NUMĂR; } Citim câte un caracter până când găsim un caracter care nu este nici spațiu, nici tablă Această buclă se poate termina și la sfârșitul fișierului Dacă caracterul este o cifră sau un punct zecimal, returnați-l la intrare utilizând funcția de bibliotecă ungetc Apoi citim numărul Pentru că getop returnează un număr ca valoare în virgulă mobilă, folosim sprintf pentru a converti valoarea lui f într-un șir de caractere din tabloul s Exercițiul (pag CG) Scrieți un program pentru a compara două fișiere care imprimă prima linie unde diferă ♦include ♦include ♦include ♦definiți MAXUNE /* comp: comparați două fișiere, imprimați prima linie */ /* unde diferă */ main(int argc, char *argv[]) { FIȘIER *fpl, *fp ; void filecomp(FILE *fpl, FILE *fp ); if (argc!- ) { /* număr greșit de argumente? */ fprintf (stderr, "comp: sunt necesare două nume de fișiere\n"); ieșire (l); }etoe{ if "fpl -fopen(*++argv, "r")) -NULL) { fprintf (stderr, "comp: nu se poate deschide %s\n", *argv); exit(l); } else if ((fp - fopen(*++argv, "r")) - NULL) { fprintf (stderr, "comp: nu se poate deschide %s\n", *argv); ieșire (l); } else { /* fișiere găsite și deschise */ filecomp (fpl, fp ); fclose(fpl); fclose(fp ); ieșire (O); } } } /* filecomp: comparați două fișiere linie cu linie */ void filecomp (FILE ♦fpl, FILE *fp ) { char linei[MAXUNE], line [MAXUNE]; char♦Ipl, *lp ; do{ Ipl -fgets(linei, MAXUNE, fpl); lp - fgets(line , MAXUNE, fp ); if (Ipl linei && lp -line ) { if (strcmpdinel, line )!- ) { printf ("Prima diferență de linie\n%s\n", linei); Ipl- p -NULL; } } else if (Ipl!- Unei && lp - Une ) printf Sfârșitul primului fișier pe linie\n%$\n", ip ); altfel dacă (Ipl - Unei && lp !- Iine ) printf("Sfârșitul celui de-al doilea fișier pe linie\n%$\n", Unei); } while (Ipl -linei &&lp - Une ); } Numărul de argumente trebuie să fie trei: numele programului și două nume de fișier Programul deschide fișierele și filecomp le compară linie cu linie Funcția filecomp citește linie cu linie din ambele fișiere Funcția fgets returnează un pointer la linia citită sau NULL când întâlnește sfârșitul fișierului Dacă Ipl și p indică liniile lor respective, atunci fișierul nu s-a încheiat și linecomp compară cele două linii Dacă liniile nu se potrivesc, filecomp tipărește linia în care fișierele diferă Dacă Ipl sau p nu indică liniile lor respective, atunci unul dintre fișiere s-a încheiat (EOF) și fișierele sunt diferite Dacă nici p , nici p nu indică linii, atunci ambele fișiere s-au încheiat (EOF) și sunt la fel Exercițiul (pag CG) Modificați programul de căutare a modelelor din Cap astfel încât să preia intrare din fișierele specificate sau, dacă nu sunt specificate fișiere cu argumente, din intrarea standard Ar trebui să fie tipărit numele fișierului dacă se găsește un șir potrivit? ♦include ♦include ♦include ♦definiți MAXLINE /♦ lungimea maximă a liniei de intrare •/ /• găsi: tipăriți linii care conțin ♦/ /♦ model de la primul argument ♦/ main(int argc, char♦argv[]) { model de caractere [MAXLINE]; intc, cu excepția- , număr- ; FIȘIER *fp; void fpat(FILE *fp, char *fname, char ♦pattem, int cu excepția numărului int); while (-argc > && (♦++argv)'[ ] while (c - *+ argv[ ]) switch (c) { case 'x*: cu excepția - ; pauză; - cazul *n*: numărul- ; pauză; Mod implicit: printf ("găsește: cheie necunoscută %c\n", c) ; argc-O; pauză; } if (argc>-l) strcpy (pattem, *argv); altfel{ printf("Apel: găsiți [-x] [-n] model [fișier ]\n"); ieșire (l); if (argc ) /* citește din stdin */ fpat(stdin, pattem, except, number); altfel while (- -argc ) /* obține numele fișierului */ if ((fp-fopen(*++argv, "r"))- NULL) { fprintf(stderr, "find: cannot open %s\n" , * argv);exit(l); } else { /* fișierul deschis */ fpat(fp, *argv, pattem, except, number); fdoză(fp); } returnează ; } /* fpat: caută model în șir */ void fpat(HLE *fp, char ♦fname, char *pattem, int cu excepția numărului int) { charline[MAXLINE]; kmglineno- ; în timp ce (fgetsdine, MAXLINE, fp) Î-NULL) { + Hineno; , if ((strstr(line, pattem) '-NULL)!-except) { if (*fname) /♦ este nume de fişier •/ printf("%s - ", foame); if (numar) /* print line number */ printf("%ld: ", lineno); printf("%s",linie); } Funcția principal tratează argumente opționale, ca în cap (pag CG) De asemenea, se așteaptă cel puțin încă un argument de tipar Dacă modelul nu este urmat de nume de fișiere, programul folosește intrarea standard Dacă este urmat, deschide fișierul specificat În ambele cazuri, programul apelează fpat Textul majorității funcției fpat este similar cu textul main funcția citește linia per apel până când fgets (p CU) returnează NULL Funcția fpat caută modelul dat pe fiecare linie Rezultatele pot fi: (stntrOlne pattem) !- NULL) !-O (modelul nu a fost găsit) !- (model găsit)!- Oh (modelul nu a fost găsit)!- (model găsit)!- exserKexcept) O (nespecificat) O (nespecificat) (specificat) (specificat) rezultat fals adevărat adevărat fals Când această expresie este evaluată la adevărat, fpat tipărește numele fișierului (dacă nu este Intrare standard), dacă este necesar dimensiunile sunt numărul liniei și linia în sine Exercițiul (pag CG) Scrieți un program care imprimă un set de fișiere, fiecare începând cu o pagină nouă, cu un antet și un număr de pagini pentru fiecare fișier ♦include ♦include ♦definiți MAXBOT /* numărul maxim de linii în partea de jos a paginii */ ♦definiți MAXHDR /♦ numărul maxim de linii în partea de sus a paginii */ ♦definiți MAXLINE /* dimensiunea maximă a unei linii */ ♦ definiți MAXPAGE /* numărul maxim de rânduri pe pagină * / /♦ prinț: imprimați fișiere, fiecare următoare pe o pagină nouă */ main (int argc, char *argv[]) { FIȘIER *fp; void fileprint(FILE *fp, char *fname); if (argc - - ) * fără argumente; print input standard */ fileprint(stdin, " "); else /* tipăriți fișierul(ele) ♦/ while ( argc > ) if ((fp-fopen(*++argv, "r")) NULL) { fprintf(stderr, "prinț: nu se poate deschide % s\n", *argv); ieșire (l); }else{ fileprint(fp, *argv); fcloee(fp); } întoarce ; } /* fileprint: print file fnâme */ void fileprint(FlLE *fp, char *fname) { int lineno, pageno - ; charline[MAXLINE]; int heading(char *fname, int pageno); b lineno - titlu (foame, pageno*-"-); while (fgetedine, MAXUNE, fp)!- NULL) { if (lineno- ){ fprintf (stdout, "\F); lineno - heading(foame, pageno++); fputs(line, tdout); if (++lineno - 'A' && (c) - 'A' && (*₽♦+) Capitolul Interfața sistemului UNIX Exercițiul (CG p ) Rescrie programul cat din cap folosind citiți, scrieți, deschideți și ciose în loc de echivalentele lor standard de bibliotecă Efectuați experimente pentru a determina vitezele relative ale celor două versiuni ♦include ♦include ♦închide "syscalte h" void eroare (char *fmt, ); /* cat: concatenează fișiere - citește / scrie / deschide / ciose */ main(int argc, char *argv[J) ) if (write(ofd, buf, n)!- n) eroare("cat: write error"); } Operator tf ((fd - open(e++argv, O RDONLY))- ) deschide un fișier pentru citire și returnează un descriptor de fișier (întreg); dacă a apărut o eroare, returnează - Funcția de copiere a fișierelor citește caracterele BUFSIZ folosind mânerul ifd Funcția de citire returnează numărul de octeți al caracterelor citite efectiv Atâta timp cât acest numărător este mai mare decât , nu există erori; înseamnă sfârșitul fișierului și - înseamnă o eroare Funcția de scriere scrie n octeți, altfel a apărut o eroare Funcția Ergog - de la p KR Această versiune este de aproximativ două ori mai rapidă decât versiunea veche din cap CR Exercițiul (pag CG) Rescrie fopen cu incendii în loc de operații explicite pe biți Comparați dimensiunile programului și vitezele de execuție "include "include "syscalls h" "definePERMS /* citire/scriere pentru proprietar, grup, alții */ /* fopen: deschide fișierul, returnează indicatorul fișierului •/ FILE *fopen(char *nume, caracter *mod) { intfd; FIȘIER*fp; tf (*mode!- *r* && *mod î- 'w* && *mod!- *a*) returnează NULL; pentru (fp iob; fp fUg is râd &&fp->flag i write ) break; /* Slotul liber găsit */ tf (fp>-Job+OPENMAX) returnează NULL; /• fără spațiu liber ♦/ tf (*mode 'w') /• create fișier ♦/ fd - creat (nume, PERMS); else tf (*mod 'a') { tf ((fd -openCname, O WRONLY, )) - ) fd - create(nume, PERMS); toeek(fd, OL, ); }else fd-open(nume, O RDONLY, ); tf (fd - - - ) /* nu a putut deschide numele fișierului */ returnează NULL; fp->fd-fd; fp->cnt-O; fp->base-NULL; fp->flag is unbuf - ; fp->flag is buf - ; fp->flag is eof - ; fp->flag is err - ; if (*mode - - 'r') { /♦ read •/ fp->flag is read - ; fp->flag is write - ; } else {/♦ scrie*/ fp->flag is read - ; fp->flag is write - ; } retum fp; } /♦ fillbuf: alocă și umple tamponul de intrare */ int Jillbuf (FIȘIER *fp) { int bufsize; if (fp->flag is read - - O fp->flag is eof fp->flag is err ) retum EOF; bufsize-(fp->flag is unbuf- ) ? :BUFSIZ; if (fp->base NULL) /♦ nici un buffer încă ♦/ if ((fp->base- (char *)malloc(bufsize)) NULL) retum EOF; /* nu poate aloca memorie */ fp->ptr - fp->base; fp~>cnt - read(fp->fd, fp->ptr, bufsize); if (-fp~>cnt cnt "-l) fp->flag is eof - ; else fp->flag is err- ; fp->cnt-O; retum EOF; retum (unsigned char) *fp->ptr++; } Declaratorul typedef pentru struct iobuf apare în c CR Unul dintre elementele lui iobuf este int steag; Variabila flag a fost redefinită în termeni de câmpuri de biți: struct flag field { unsigned is read: ; nesemnat i write: ; nesemnat is unbuf: ; nesemnat is buf: ; nesemnat is eof: ; nesemnat is err: ; }î L În operator if ((fp->flag & (-READ: -WRITE)) - ) break; peste valorile READ și WRITE se face SAU: (-CITESTE, SCRIE) I octal I binar rezultate Aceasta înseamnă că declarația if este adevărată atunci când ambii biți inferiori ai steagului sunt clari (nici citiți, nici scrieți) Declarația if verifică dacă elementul iob nu este citit sau scris Câmpurile de biți verifică în mod explicit condiția: if (fp->flag is read - - && fp->flag is write - - ) break; Următoarea modificare setează în mod explicit biții: fp->flag is unbuf - ; fp->flag iS-buf- ; fp->flag is eof- ; fp->flag is err - ; Mai departe fp->flag - (♦mode-'r') ? -CITESTE, SCRIE; setează steag în funcție de mod Dacă este "r", instrucțiunea face ca flag egal cu JREAD, în caz contrar WRITE Cu câmpurile de biți, dacă modul este "r", bitul de citire este setat la Dacă nu, este setat la bitul de is write: dacă (♦mod -'r*) { fp->flag is read - ; fp->flag iS-Write - ; }altfel{ fp->flag fe-read - ; fp->flag is write - ; } Funcția -fillbuf se modifică în mod similar Funcția fillbuf returnează EOF în următoarele situații: fișierul nu a fost deschis pentru citire, s-a întâlnit sfârșitul fișierului sau a fost întâlnită o eroare dacă ((fp->flag& (-READ:-EOF: ERR)) Î-JREAD) Această condiție este verificată folosind câmpuri de biți: if (fp->flag iS-read ІІ fp->flag iS-eof - fp->flag is err - - ) Mai departe bufsize - (fp->flag & JJNBUF) ? :BUFSIZ; schimbări la bufsize-(fp->flag is unbuf - ) ? :BUFSIZ; A fp->flag:- EOF; altfel fp->flag :- ERR; devine fp->flag is eof - ; altfel fp->flag is err - ; Dimensiunea programului a funcției modificate a fost mai mare, iar funcțiile rulau mai lent Câmpurile de biți sunt dependente de mașină și pot încetini execuția programului Exercițiul (pag CG) Proiectați și scrieți funcțiile flushbuf, ffhish și fclose ♦include "syscalls h" /* flushbuf: Alocați sau ștergeți tamponul de ieșire */ int flushbuf (int x, FILE *fp) { nesemnat nc; /* numărul de caractere de șters */ int bufsize; /♦ dimensiunea tamponului alocat */ if (fp - iob + OPEN MAX) retum EOF; /* eroare: pointer nevalid */ if ((fp->flag & ( JWRITE: ERR)> "- WRITE) return EOF; bufsize-(fp->flag & UNBUF) ? :BUFSIZ; if (fp->base NULL) { /♦ nici un buffer încă •/ if ((fp->base-(char *)malloc (bufsize)) NULL) { fp->flag :- ERR; retum EOF; /* nu poate aloca memorie */ } else{ /* buffer-ul există deja*/ nc - fp->ptr - fp->base; if (scrie(fp->fd, fp->bază, nc)!- hc) { fp->flag :- ERR; retum EOF; /♦ eroare, returnează EOF */ } } fp->ptr - fp->bază; /♦ pornire tampon ♦/ ♦fp->ptr++ - (char) x; /♦ stochează caracterul curent ♦/ fp->cnt-bufsize - ; întoarce x; } /• fcloee: închide fișierul */ int fcloee (FIȘIER *fp) interior; /♦ cod de returnare */ dacă ((rc " fflush (fp)) Î-EOF) { /• ceva de spălat? ♦/free(fp->base); /* buffer alocat gratuit ♦/ fp->ptr-NULL; fp->cnt-O; fp->base-NULL; fp->flag A- ~( READ: JWRITE); } return rc; } /♦ fflush: spălați fișierul de potrivire al bufferului fp ♦/ int fflush (FIȘIER *frA J intrc-O; if (fp -Job + OPENMAX) returnează EOF; /• eroare: pointer nevalid */ tf (fp-Hlag A WRITE) rc- fiushbuf(O, fp); fp->ptr - fp->bază; fp->cnt - (fp->flag A UNBUF) ? :BUFSIZ; return rc; } Funcția flushbuf returnează EOF dacă fișierul nu a fost deschis pentru scriere sau a apărut o eroare: dacă flag & ( -WRITE: ERR)> !- WRTTE) returnează EOF; Dacă bufferul nu există deja, acesta este alocat, ca în fillbuf (p a CD-ului) Dacă tamponul există, caracterele sale sunt eliminate în flux Următorul pas este stocarea argumentului într-un buffer: *fp->ptr+-t (char)x; În acest caz, numărul de caractere posibile din buffer (fp->cnt) este cu unul mai mic decât dimensiunea tamponului datorită caracterului tocmai stocat Funcția felose numește fflush Dacă fișierul a fost deschis pentru scriere, poate fi necesar să renunțați la unele caractere Funcția felose resetează membrii structurii iobuf, astfel încât fopen să nu se poticnească cu valori fără sens în spațiul liber Codul de returnare este dacă nu există erori Funcția fflush verifică corectitudinea fișierului și apelează flushbuf dacă fișierul a fost deschis pentru scriere Apoi fflush resetează ptr și cnt și returnează tc " Exercițiul (pag CG) Funcția standard de bibliotecă int fseek(FIȘIER *fp, offset lung, origine int) este identic cu Iseek, cu excepția faptului că fp este un pointer de fișier în loc de un descriptor de fișier, iar valoarea returnată este o stare int mai degrabă decât o poziție Scrie fseek Asigurați-vă că fseek-ul nostru este în concordanță cu buffering-ul orn*buiso?ana pentru alte funcții standard ale bibliotecii #indude "syscalls h" /* fseek: acces aleatoriu folosind indicatorul fișierului int fseek (FIȘIER *fp, offset lung, origine int) { nesemnat nc; /* numărul de caractere de spălat */ lung rc- ; /* cod de returnare */ if (fp->flag & READ) { dacă (origine ) /♦ din poziţia curentă? ♦/offeet fp->cnt; /• ținând cont de caracterele din buffer */ rc - lseek(fp->fd, offset, origin); fp->int- ; /♦ fără caractere în buffer ♦/ } else if (fp->flag& WRITE) { dacă ((nc-fp->ptr-fp~>bază) > ) dacă (scrieți (fp->fd, fp->bază, nc)!- nc) GS ; if (rc ! l) /♦ nicio eroare încă? ♦/ rc - lseek(fp->fd, offset, origine); } retum (rc " ) ?-l: ; } Variabila c conține codul de retur Dacă apare o eroare, aceasta este setată la - Există două situații în funcția fseek: fișierul este deschis pentru citire sau fișierul este deschis pentru scriere Când fișierul este deschis pentru citire și originea este , offset-ul este măsurat de la poziția curentă (alte cazuri: origine , offset este măsurat de la începutul fișierului; origine , offset este măsurat de la sfârșitul fișierului) Pentru a măsura offset-ul față de poziția curentă, fseek ia în considerare caracterele aflate deja în buffer: if (origine- ) offset fp->cnt; Apoi fseek apelează Iseek și elimină caracterele din buffer: rc - lseek(fp->fd, offset, origine); fp-Xmt- ; Când un fișier este deschis pentru scriere, fseek șterge mai întâi caracterele din buffer, dacă există: dacă ((nc*fp->ptr-fp->bază) > ) dacă (scrie(fp->fd, fp->bază, nc)!- nc) rc- ; Dacă nu există erori, fseek apelează Iseek: if (rc!- ) rc-lseek(fp->fd, offset, origine); Funcția fseek returnează pentru mișcările valide Exercițiul (pag CG) Schimbați programul fsize pentru a imprima și alte informații conținute în inode ' finchide găsi finclude /• steagurile pentru funcțiile de citire și scriere*/ finclude /• typedefs (typedef) */ findude /♦ structure/stat return ♦/ #include "direct h" int stat(char*, struct stat*); void dirwalk(char*, void (*fcn) (char *)); /• fsize: imprimă numărul inodului, modul de acces, refs ♦/ z /• și dimensiunea fișierului */ void fsize(char *name) { struct stat stbuf; if (statfname, ftstbuf) - ) { fprintf(stderr, "fsize: fișierul %s nu poate fi accesat\n", nume); întoarcere; > if ((stbuf ^t mode & SJFMT) - SJFIMR) dirwalk(nume, fsize); printf("% u & o % u % d %s\n", stbuf stjno, mod stbuf st, stbuf st nlink, stbuf stjrize, nume); } Am schimbat fsize pentru a imprima numărul inodului, modul de acces la fișier în octal când Numărul de link-uri către fișier, dimensiunea și numele fișierului Puteți alege să imprimați mai multe informații, în funcție de ceea ce este important pentru dvs Funcția dirwalk apare la p CR Exercițiul (pag CG) Funcția standard de bibliotecă caiioc(n, size) returnează un pointer către n obiecte de dimensiune, memoria este setată la zero Scrie caios apelând malloc sau modificându-l ♦include "syscalls h" /* calloc: alocă n obiecte cu dimensiunea mărimii */ void *calloc (n nesemnat, dimensiune nesemnată) { nesemnat , nb; char *p, *q; nb-n*mărime; if ((pq-malloc (nb)) Î-NULL) pentru (iO;i MAXBYTES) { /♦ nu mai mare decât MAXBYTES ♦/ fprintf (stderr, "alloc: nu se poate aloca mai mult de %u octeți\n", MAXBYTES); returnează NULL; nunits-(nbytes + sizeof(Header) - ) /sizeof(Header) + ; /♦ ♦//♦ vezi în continuare c KP */ } #define NALLOC /♦ numărul minim de blocuri de solicitat ♦/ /♦ morescore: cere sistemului pentru mai multă memorie ♦/ static Header •morescore (nesemnat) { char *cp, •sbrk(int); Antet *sus; if (nu s size-nu; maxalloc - (sus->s size > maxalloc) ? sus->s mărime: maxalloc; liber((void •)(upH)); return freep; } /• free: pune blocul ap pe lista de blocuri libere •/ void free (void *ap) { Antet *bp, *p; bp - (Header *)ap - ; /♦ indică antetul blocului •/ if (bp->s size ::bp->s size >maxalloc) { fprintf (stderr, "free: cannot free %u bytes\n", bp~ > dimensiunea s ); întoarcere; } pentru (p-freep; !(bp>p&&bp s ptr);pp->s ptr) /♦ ♦/;/♦ vezi în continuare p CR ♦/ } S Funcția malloc compară numărul necesar de octeți cu o constantă arbitrară MAXBYTES Alegeți valoarea pentru MAXBYTES care funcționează cel mai bine pentru sistemul dvs Când morescore alocă un bloc nou, variabila statică maxalloc își amintește dimensiunea celui mai mare bloc utilizat Astfel, funcția liberă poate verifica dacă valoarea mărimii nu este și nu este mai mare decât cel mai mare bloc alocat Exercițiul (pag CG) Scrieți o funcție bfree(p,n) care va elibera un bloc arbitrar p de n caractere în lista de blocuri libere menținută de funcțiile malloc și free Folosind bfree, puteți adăuga oricând o matrice statică sau externă la lista gratuită "include "syscalls h" /* bfree: eliberează un bloc arbitrar p de n caractere */ unsigned bfree (char *p, unsigned n) { Antet*hp; if(n s size - n/sizeof(Header); liber ((void ♦) (hp+D); retum hp->s size; } Funcția bfree are două argumente: un pointer p și un număr de caractere n Va elibera blocul dacă dimensiunea lui este cel puțin sizeof (Header), altfel va returna Pointerul p este convertit la tipul Header și atribuit hp: hp - (Header ♦) p; Dimensiunea blocului în unități de dimensiune (Header): hp->s size-n / sizeof(Header); Ultimul pas numește funcția gratuită Deoarece free se așteaptă ca indicatorul să fie setat chiar dincolo de zona antetului, folosim (hp+I) ca morecore și îl aruncăm la tip (void *) Funcția bfree returnează dacă blocul este prea mic, în caz contrar dimensiunea blocului este în unități de sizeof(Header) Index de subiect A ordine de sortare alfabetică argumente din linia de comandă , , , , , , , argumente scanf B беззнаковый символ библиотечная функция bsearch , close cos exit , , exp felose , fgets , fopen , fprintf , fputs free , getchar isalnum , isalpha , , , iscntrl isdigit islower isprint isspace isupper malloc , , open , pow read , scanf , , sin sprintf , sscanf , strcpy strlen strstr tolower toupper ungetc va arg , va end , va start , write , , бинарное дерево ПО, бинарный поиск căutare binară, utilizați operațiunea ȘI pe biți , biți operațiune SAU pe de biți operațiune SAU exclusivă pe de biți și operare , biți operațiune l pe biți operațiune I pe de biți buffer cu un singur caracter ÎN vector argument, argv , , , , , , , histogramă verticală instrucțiuni de comutare imbricate șir de returnare la intrare returnare la intrare EOF constantă octală ieșire octală rotire întreg la dreapta , G histograma histograma verticală histograma orizontală histograma frecvenței condiția la limită D complement binar , arbore, traversare recursivă intervale de tip directivă #defini #undef fișier antet beep ȘI Și operația cu biți, & , Și operația logică, && Operare cu biți SAU, I SAU operație exclusivă pe biți, l Operație logică SAU, operațiune SAU exclusivă, l Linie de comandă K, argumente , , , , , , l operațiune logică AND, && operațiune logică SAU, operațiune logică && operațiune logică M macro abs , isupper swap tolower toupper matrice de pointeri , H notație științifică caractere negrafice, tipărire DESPRE ordine inversă de sortare buffer cu un singur caracter operator fă , fă-în timp ce , pentru dacă dacă-altfel , , comutatorul comutator imbricat în timp ce , , operații pe biți operațiuni biți AND și , bit SAU, I biți exclusiv SAU, l diviziuni modulo, % , , Complementul lui , - , , , ȘI logic, && SAU logic, , obține adresa și tip conversie shift stânga, " , , shift right", , P paranteze perechi inversarea unui șir de caractere tip enumerat tipărirea caracterelor negrafice avans de formular, \f caracter de subliniere, tabulator ; căutare binar notație inversă poloneză, calculator conversie minuscule în majuscule litere mari în minuscule ASCII pentru a pluti ASCII în întreg operație de conversie a tipului spații finale program calculator , , #define handler tipărire pe cea mai lungă linie imprimare fișiere numărare cuvinte căutare de modele transformări de temperatură , , pliere șir lung sortare , , , comparare fișiere referințe pentru reticulare detab entab expr sort , , , coada undei P separator de cuvinte funcția recursivă itoa traversarea arborelui recursiv CU apariția cea mai din dreapta a șirului lista legată deplasare la stânga, operație, " , , schimbare la dreapta, operație", , caractere caracter nesemnat bipuri \? "Uau rânduri, \n , , , * nul, \ bare oblice inverse, -\\ antet, V caractere de subliniere, caractere semnate file, \t , control, \ pași înapoi, \b constantă simbolică , , , , sintaxă, verificare elementară apel de sistem creat Iseek stat paranteze pereche sort în ordine alfabetică în ordine inversă după câmpurile cu combinația lista de argumente cu lungime variabilă intrare standard (stdin) ieșire standard (stdout) ieșire eroare standard (stderr) variabile statice , contor argument, argc , , , , , , , Operator ternar, ?: tipuri, intervale punct și virgulă La șterge comentarii pointeri, matrice expresie condiționată ?: F fișiere, funcție de imprimare bibliotecă, vezi funcția de bibliotecă addln addtreex orice atof atof, versiunea pointer btree binsearch bitcount calloc charcmp , , clear comentariu comparare copie ziua anului ziua anului, versiunea indicator dd dclspec detab dirdcl , echo quote entab errmsg , error , escape esettab expand exptab fclose fflush filecomp filecopy ffleprint Jillbuf findblnk flushbuf fopen fpat free fseek fsize getch , getdef getfloat getint getline pointer versiune getop pointer versiune gettoken getword heading htoi inc invert in comment in quote itoa pointer itoa recurs itob lalloc inferior malloc mathfnc minprintf minscanf month day month day, versiunea pointer morecore newpos nexttoken noiseword numcmp parmcmp citire : : invers, versiunea indicator inversor rightrot search setbits settab skipblanks sortlist squeeze strcat, pointer version strend strindex, versiunea pointer stmcat strncmp stmcpy strrindex substr tappos treestore treexprint typequal typespec undef unescape ungetch ungets wordlength writelines X spații de coadă tabel hash C cifre hexazecimale H frecvența de apariție frecvență, histograma flotanți, conversie din ASCII W întreg hexazecimal de cifre hexazecimale E sintaxă elementară, verificați #define, directiva #undef, directiva % operație modulo , , & operare pe biți și , & operațiune obține adresa && operațiune logică ȘI " operațiune de schimbare la stânga , " operare schimbare dreapta , ?: expresie condiționată \ caracter de control \ caracter nul \ corn caracterul \\ caracterul bară oblică inversă \b backspace caracterul \f caracter cu antet \n caracter nou linie , , , caracterul tabulator \t , L bitul de operare XOR caracter de subliniere ERR CITEȘTE SCRIE iobuf, struct Funcționez pe biți SAU II operațiune logică SAU ~ Operația complementului , , , A abs, macro , argc, contor argument , , , , , , , argv, vector de argumente , , , , , , , ASCII pentru a pluti ÎN BUFSIZ CU char, interval creați, apel de sistem D ♦define, do directivă, do-while instrucțiunea, instrucțiunea E enumerarea EOF EOF returnat la intrarea ERR DOSARUL pentru, afirmația eu if, instrucțiunea if-else, instrucțiunea , , ini, interval iobuf, struct isupper, macro L lung, interval Iseek syscall M N NULL O O RDONLY O WRONLY R CITEȘTE S scanf, argumente scurt, interval caracter semnat dimensiunea, operațiune , , , stat, apel de sistem static, variabilă , stderr stdin stdout struct iobuf swap, macro comutator, instrucțiunea , comutare, instrucțiunea imbricată T macro de jos macro de înălțime U #undef, directiva unsigned char W while instrucțiunea , , SCRIE , Cuprins Cuvânt înainte Capitolul Introducere didactică Capitolul Tipuri, operații și expresii Capitolul Management Capitolul Funcțiile și structura programului Capitolul Pointeri și tablouri Capitolul Structura Capitolul Intrare și ieșire Capitolul Interfața de sistem UNIX Index Toido, Gimpel limba SI carte, răspunsuri • Editor T A Petrova, L A Tabakova AIS editor E F Artista Timokhina editor Yu I Artyukhov Tech, editor L G Chelysheva corectori T M Kolpakova, N P Speranskaya Coperta de artistul V A Togobitsky Aspect original reprodus realizat de T M Kudinova, E F Timokhina IB № Semnat pentru publicare la februarie Format * / Hartie offset Orele căștilor Imprimare offset Conv p l - Uch -ed l , Conv kr -ott , Tiraj de exemplare Ordin • "C * Editura "Finanțe și Statistică" , Moscova, st Cernîșevski, Tipărită în tipografia editurii "Novosti" , Moscova, st F Engels, Atenție cititorilor! Editura "Finanțe și Statistică" a publicat o nouă literatură despre tehnologia computerelor: Lipaev V V Managementul dezvoltării software: metode, standarde, tehnologie Prototiparea, proiectarea și implementarea sistemelor informaționale de dialog / L I Gukov, E I Lo-mako, A V Morozov și alții Kanatnikov A N , Tkachev S B Programare în mediul Cіirreg Versiunea și caracteristicile versiunii Din C K C++ / E N Cosell, T V Russ, S G Svitkovsky și alții Mishenin A I Teoria sistemelor informaţionale economice: Manual Informatica economica si tehnologia calculatoarelor: Manual / A Yu Korolev, N G Chernyak, G A Titorenko și alții Figurnov V E PC IBM pentru utilizatori Ediția a patra, revizuită și mărită 